22 Январь 2009

При щелчке в TextBox’е, текст автоматом выделяется

TextBox |  Таги: ,

При щелчке в TextBox’е, текст автоматом выделяется.

Option Explicit

Private Sub Text1_GotFocus()
'При получении текстовым полем фокуса
'Щелчком мыши или Tab, весь текст выделиться
'Удобно использовать, если данные нужно убрать из поля
Text1.SelStart = 0&
Text1.SelLength = Len(Text1.Text)
End Sub


Оставить комментарий

Я не робот.