在运行阶段,要在文本框Textl获得焦点时选中文本框中所有内容,对应的事件过程是( )。
A.
Private Sub Textl_GotFocus() Textl.SelStart=0 Textl.SelLength=Len(Textl.Text) End Sub
B.
Private Sub Textl_LostFocus() Textl.SelStart=0 Textl.SelLength=Len(Textl.Text) End Sub
C.
Private Sub Textl_Change() Textl.SelStart=0 Textl.SelLength=Len(Textl.Text) End Sub
D.
Private Sub Textl_SetFocus() Text.SelStart=0 Textl.SelLength=Len(Textl.Text) End Sub