知っていれば簡単ですが、知らないと苦労するものの一つです。 Private Sub Text1_GotFocus() Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End Sub
知っていれば簡単ですが、知らないと苦労するものの一つです。
Private Sub Text1_GotFocus() Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End Sub
Private Sub
Text1_GotFocus() Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text)
End Sub