[2008/10/04] 更新
<--- 一覧へ戻る
[文字列の変換 StrConv / 半角 --> 全角]
今回は半角を全角に変換するマクロです。
Private Sub CommandButton1_Click()
'========================
'vbWide 半角--->全角
'========================
Dim myStr As String
myStr = TextBox1.Text
TextBox2.Text = StrConv(myStr, vbWide)
End Sub
[文字列の変換 StrConv / 半角 --> 全角]今回は半角を全角に変換するマクロです。
Private Sub CommandButton1_Click()
'========================
'vbWide 半角--->全角
'========================
Dim myStr As String
myStr = TextBox1.Text
TextBox2.Text = StrConv(myStr, vbWide)
End Sub
関数
|
【2008-10-04(Sat) 09:47:21】
|
Trackback(-) |
Comments(-)