Berikut ini adalah cara memblok semua isi TextBox secara otomatis ketika TextBox di Klik atau dalam keadaan Got Focus.
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
Berikut ini adalah cara memblok semua isi TextBox secara otomatis ketika TextBox di Klik atau dalam keadaan Got Focus.
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
Kategori: TextBox
0 comments:
Post a Comment
Jika anda ingin berkomentar dan tidak mempunyai akun silahkan pilih anonymous.
Note: only a member of this blog may post a comment.