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