VBの上書きモードで全角文字を入力するには？ (ID:76301)

名前

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

本文 意味が違うかもしれませんが Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If Text1.SelLength <> 0 Then Text1.Text = "" End If End Sub では？どうでしょう。 問題はありますけど。