如何实现TextBox控件获得焦点时选中文本

作者：Eve Cole 更新时间：2025-01-16 11:12:01

有时我们想在textbox控件获得焦点时而选中textbox中的所有文本，这可通过SelStart和SelLength属性来达到。具体来讲就是在对象得到焦点时，从最前面开始选取（SelStart=0），选取的长度为文本长度（Len（Text1）），源代码如下：

Private Sub Text1_GotFocus()

Text1.SelStart = 0

Text1.SelLength = Len(Text1)

End Sub

GotFocus事件是在控件获得焦点时发生。