在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是

A.PrivateeSubbText1_GotFocus(())
Text1.SelStart=00
Text1.Sellength=Len(Text1.Text))EnddSub

B.PrivateeSubbText1_LostFocus(())
Text1.SelStart=00
Text1.Sellength=Len(Text1.Text))EnddSub

C.PrivateeSubbText1_Change(())
Text1.SelStart=00
Text1.Sellength=Len(Text1.Text))EnddSub

D.PrivateeSubbText1_SetFocus(())
Text1.SelStart=00
Text1.Sellength=Len(Text1.Text))EnddSub

E.