设窗体中有一个文本框Text1，若在程序中执行了Text1．SetFocus，则触发（ ）。A.Text1的SetFocus事件B.Text1的GotFocus事件C.Text1的LostFocus事件D.窗体的GotFocus事件
设窗体中有一个文本框Text1，若在程序中执行了Text1．SetFocus，则触发（ ）。
A.Text1的SetFocus事件
B.Text1的GotFocus事件
C.Text1的LostFocus事件
D.窗体的GotFocus事件
相关考题：
（ 17 ）设窗体中有一个文本框 Text1 ，若在程序中执行了 Text1.SetFocus ，则触发A ） Text1 的 SetFocus 事件B ） Text1 的 GotFocus 事件C ） Text1 的 LostFocus 事件D ）窗体的 GotFocus 事件
设窗体中有一个文本框Textl，若在程序中执行了Textl．SetFocus，则触发A．Textl的SetFocus事件B．Textl的GotFocus事件C．Textl的LostFocus事件D．窗体的GotFocus事件
设窗体上有一个文本框Text1和一个命令按钮Command1，并有下列事件过程： Private Sub Command1_Click() Dim s As String，Ch As String s="" For k=1 To Len(Text1) ch=Mid(Text1，k，1) s=ch+s Next k Text1.Text=s End Sub 程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是( )。A．BasicB．cisaBC．BASICD．CISAB
VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母（ ）。A. 只触发KeyUp事件B. 这3个事件都会触发C. 只触发KeyDown、KeyPress事件D. 不触发其中任何一个事件
在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String，n As Integer str=UCase(Chr(KeyAscii)) n=Len(str)。 Text1．Text=String(n，str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为（ ）。A.A.pp B.pP C.ｐｐ D.PpB.
在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：Private Sub Text1 KeyPress(KeyAscii As Integer)Dim str As String,n As Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1.Text=String(n,str)End Sub程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：Private Sub Text1_KeyPress(Key Ascii As Integer)Dim str As String, n As Integer str=UCase(Chr(Key Ascii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母（ ）。A.这3个事件都会触发B.只触发KeyPress事件C.只触发KeyDown、KeyUp事件D.不触发其中任何一个事件
（ 12 ）在窗体上有一个文本框控件，名称为 Text1 。同时，窗体加载时设置其计时器间隔为 1 秒、计时器触发事件过程则实现在 Text1 文本框中动态显示当前日期和时间。请补充完整。Private Sub Form_Load( )Me.TimerInterval =1000End SubPrivate Sub 【 12 】Me!text1 = Now( )End Sub