テキストボックスにカーソルを合わせた時に数字を消すには？ (ID:105338)

名前

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

本文 GotFocus イベントを追加するだけです。 Private Sub Text1_GotFocus() With Text1 .SelStart = 0 .SelLength = Len(.Text) End With End Sub