单选题设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发（　　）。AText1的SetFocus事件BText1的GotFocus事件CText1的LostFocus事件D窗体的GotFocus事件

单选题
设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发（　　）。
A

Text1的SetFocus事件

B

Text1的GotFocus事件

C

Text1的LostFocus事件

D

窗体的GotFocus事件

参考解析

解析：
SetFocus方法用于把输入光标（焦点）移到指定的文本框中，获得焦点后就触发了事件GotFocus。

相关考题：

（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：Private sub form_click()X=val(inputbox( “ 输入 x 的值 ” ))Y=1If x then y=2Text1.value=yEnd sub打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是A ） 1B ） 2C ） 3D ） 4
查看答案
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 9Sum=Sum=iNext iText1.Text=SumEnd Sub上述程序的运行结果是A．在文本框Text1中输出45B．在文本框Text1中输出0C． 出错D． 在文本框Text1中输出不定值
查看答案
在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
查看答案
（ 12 ）在窗体上有一个名为 Text1 的文本框。当光标在文本框中时，如果按下字母键 “ A ” ，则被调用的事件过程是A ） Form_KeyPress()B ） Text1_LostFocus()C ） Text1_Click()D ） Test1_Change()
查看答案
在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click() m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。A．5B．8C．9D．10
查看答案
在窗体上一个文本框，其名称为Text1,然后编写如下事件过程：PrivateSubText2_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerstr=Ucase(Chr(KeyAscii))n=Len(str)Text1=String(n,str)EndSub程序运行后，如果在TEXT2中通过键盘上输入单字母k，则在文本框Text1中显示的内容为( )A.kB.KC.KKD.Kk
查看答案
（ 17 ）设窗体中有一个文本框 Text1 ，若在程序中执行了 Text1.SetFocus ，则触发A ） Text1 的 SetFocus 事件B ） Text1 的 GotFocus 事件C ） Text1 的 LostFocus 事件D ）窗体的 GotFocus 事件
查看答案
在窗体上有一个文本框控件，名称为Text l。同时，窗体加载时设置其计时器间隔为1s、计时器触发事件过程则实现在Text1文本框中动态显示当前日期和时间，请补充完整。Private Sub Form_Load()Me.TimerInterval=1000End SubPrivate Sub 【 】Me!text1=Now()End Sub。
查看答案
（13）在窗体上画一个文本框（其Name属性为Text1）,编写下列事件过程，运行结果是。 Private Sub Form_Load() Show Text1.Text="你好！" Text1.SetFocus For i=1 To 15 Sun=Sun+i Next i Text1.Text=Sun End Sub
查看答案
设窗体中有一个文本框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
查看答案
在窗体上画一个文本框(其NAME属性为TExT1)，然后编写如下事件过程： PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。A．在文本框TEXT1中输出55B．在文本框TEXT1中输出0C．出错D．在文本框TEXT1中输出不定值
查看答案
设窗体中有一个文本框Text1，若在程序中执行了Text1．SetFocus，则触发（ ）。A.Text1的SetFocus事件B.Text1的GotFocus事件C.Text1的LostFocus事件D.窗体的GotFocus事件
查看答案
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
查看答案
窗体上有一个文本框，其Name属性为Text1，如图1所示，并有如下事件过程：上述程序的运行结果是（ ）。A. 在文本框Text1中输出55B. 在文本框Text1中输出0C. 语法错误D. 在文本框Text1中输出不定值
查看答案
窗体上确文本框Text1和一个菜单，菜单标题、名称见表，结构如图2所示。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中，下面可实现此功能的事件过程是（ )。
查看答案
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 Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1.Text=String(n,str)End Sub程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
查看答案
在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end subA． 在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
查看答案
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下： Private Sub Command1_Click Dim a(10)As Integer，b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体，单击命令按钮，文本框Text1中显示的内容是（ ）。A.13B.14C.15D.16
查看答案
在窗体上画一个文体框(其Name属性为Text1)，然后编写如下事件姓程； Private Sub Fom_Load() Text1.Text="" Text1.SetFocus For i=1 To 10 Stun=Stun +i Next i Text1.Text=Sum End Sub 上述程序的运行结果是______。A．在文本框Text1中输出55B．在文本框Tece1中输出0C．出错D．在文本框Text1中输出不定值
查看答案
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
查看答案
在窗体上添加一个文本框Text1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private sub Form_Load() Text1.Text="" Text1.SetFocus For k=1 To 5 t=t*k Next k Text1.Text=t End SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
查看答案
如果在窗体上已经创建了一个文本框对象Text1,可以通过()事件获得输入键值的ASCII码. A、ChangeB、LostFocusC、KeyPressD、GotFocus
查看答案
（ 12 ）在窗体上有一个文本框控件，名称为 Text1 。同时，窗体加载时设置其计时器间隔为 1 秒、计时器触发事件过程则实现在 Text1 文本框中动态显示当前日期和时间。请补充完整。Private Sub Form_Load( )Me.TimerInterval =1000End SubPrivate Sub 【 12 】Me!text1 = Now( )End Sub
查看答案
在表单FORM1中有一个文本框TEXT1，TEXT1的INIT事件代码如下：THIS.VALUE=0TEXT1的VALID事件代码如下：S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22，然后按回车键，TEXT1中将显示（）。A、0B、22C、50D、100
查看答案
单选题在窗体上画一个文本框（其Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i= 1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是（　　）。A在文本框Text1中输出45B在文本框Text1中输出0C出错D在文本框Text1中输出不定值
查看答案
热门标签