때로는 텍스트 상자 컨트롤에 포커스가 있을 때 텍스트 상자의 모든 텍스트를 선택하고 싶을 때가 있습니다. 이는 SelStart 및 SelLength 속성을 통해 달성할 수 있습니다. 구체적으로, 객체가 포커스를 받으면 정면에서 선택되며(SelStart=0), 선택된 길이는 텍스트 길이(Len(Text1))가 됩니다. 소스코드는 다음과 같습니다.
비공개 하위 Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = 길이(텍스트1)
서브 끝
GotFocus 이벤트는 컨트롤이 포커스를 얻을 때 발생합니다.