直接入力モードになった時、その文字列も全角にするには？ (ID:123787)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 92 Then '半角の\が入力されたら KeyAscii = -32369 '強制的に全角¥に変換 End If End Sub こんなのどうでしょう？ \以外も全角にしたいのなら結構根気が要りますが・・・ｗ