有時我們想在textbox控件獲得焦點時而選中textbox中的所有文本，這可通過SelStart和SelLength屬性來達到。具體來講就是在對象得到焦點時，從最前面開始選取（SelStart=0），選取的長度為文本長度（Len（Text1）），源代碼如下：

Private Sub Text1_GotFocus()
               Text1.SelStart = 0
               Text1.SelLength = Len(Text1)
        End Sub

GotFocus事件是在控件獲得焦點時發生。