VFP数据库
表单中有三个文本框和一个命令按钮，欲在单击命令按钮后将焦点设在第二个文本框，命令THISFORM.TEXT2.SETFOCUS应该书写在（）事件中。A、命令按钮的CLICKB、TEXT2的CLICKC、命令按钮的SETFOCUSD、TEXT2的SETFOCUS
题目
表单中有三个文本框和一个命令按钮，欲在单击命令按钮后将焦点设在第二个文本框，命令THISFORM.TEXT2.SETFOCUS应该书写在（）事件中。
- A、命令按钮的CLICK
- B、TEXT2的CLICK
- C、命令按钮的SETFOCUS
- D、TEXT2的SETFOCUS
相似问题和答案
第1题：
在窗体中有两个文本框分别为Textl和Text2，一个命令按钮Cmmand1，编写如下两个事件过程：
Private Sub Commandl_Click()
a=Textl．Value+Text2．Value
MsgBox a
End Sub
Private Sub Form_Load()
TextI．Value=“”
Text2．Value=””
End Sub
程序运行时，在文本框Textl中输入78，在文本框Text2中输入87，单击命令按钮，消息框中输出的结果为【 】。
7887 解析：在窗体载入时将两个文本框置为空字符串，命令按钮的单击事件是将两个文本框中的内容作为字符串连接起来。所以当程序运行时输入78和87后结果为7887。
第2题：
请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。
1．在窗体(名称为Form1)上画两个命令按钮，其名称分别为C1和C2，标题分别为“命令按钮1”和“命令按钮2”，编写适当的事件过程。程序运行后，“命令按钮2”隐藏，此时如果单击“命令按钮1”，则“命令按钮2”出现，“命令按钮1”隐藏；而如果单击“命令按钮2”，则“命令按钮1”出现，“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意；存盘时，工程文件名为sjt1.vbp．窗体文件名为sjt1.frm。
2．在Form1的窗体上画一个命令按钮，其名称为C1，标题为“显示”；再画一个文本框，其名称为Text1，编写适当的事件过程。程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；此时如果单击命令按钮，则在文本框中显示“等级考试”。程序运行情况如图1—2所示。
第3题：
在窗体中有两个文本框分别为 text1 和 text2 ，一个命令按钮 command1, 编写如下两个事件过程：
Private sub command1_click()
A=text1.value+text2.value
Msgbox a
End sub
Private sub form_load()
Text1.value= ””
Text2.value= ””
End sub
程序运行时，在文本框 text1 中 78 ，在文本框 text2 中输入 87 ，单击命令按钮，消息框中输出的结果为____ 11 ___
第4题：
若窗体Forml中有一个命令按钮Cmdl，则窗体和命令按钮的Click事件过程名分别为（ ）。
A.Form_ClickCommandl_Click
B.Fzml_ClickCommamdl_Click
C.Form_ClickCmdl_Click
D.Frml_ClickCmdl_lAck
根据窗体的名称定义事件过程，在操作中就可以知道。
第5题：
在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是__________。
30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题，使用了二重循环为二维数组进行了部分赋值，最后求两个数组元素值并求和，注意这两个元素是否已被赋值，若没有赋值则为0。本题中对于a(2，3)赋值为2*3也就是6，a(4，6)赋值为4*6也就是24，最后的结果为6 24=30。
第6题：
窗体上有名称为Cornmandl的命令按钮和名称为Textl的文本框
Private Sub Commandl_Click()
Textl．Text=“程序设计”
nxt1．SetFocus
End Sub
Private Sub Textl_GotFocus()
Textl．Text=”等级考试”
End Sub
运行以上程序，单击命令按钮后
A．文本框中显示的是“程序设计”，且焦点在文本框中
B．文本框中显示的是“等级考试”，且焦点在文本框中
C．文本框中显示的是“程序设计”，且焦点在命令按钮上
D．文本框中显示的是“等级考试”，且焦点在命令按钮上
解析：运行程序后单击命令按钮，首先执行命令按钮Commandl_Click代码的内容，即Textl文本框获得焦点并显示内容“程序设计”；当文本框获得焦点后，程序执行文本框的Textl_GetFocus事件代码。即文本框显示内容“等级考试”，覆盖了原来文本框的内容，同时文本框获得焦点。
第7题：
在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：
Private Sub Command1_Click()
Text 1="VB programming"
Text 2=Text 1
Text 1="ABCD"
End Sub
程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。
VB programming 解析：本段程序是先把“VB programming”赋给Text 1，然后在把Text 1的内容赋给Text 2，最后把“ABCD”赋给Text 1。所以最后Text 1中的内容是“ABCD”，而Text 2中的内容是“VB programming”。
第8题：
单击表单中的命令按钮，要求弹出一个“您好!”的消息对话框，应该在命令按钮的 Click事件中编写代码：______=("您好!")
Messagebox 解析：以对话框形式显示信息，可以使用命令：
MessageBox(信息文本[,对话框类型][,标题文本])
其中，信息文本是在对话框中显示的信息；对话框类型是3个整数之和，用于指定对话框的样式，包括对话框中的按钮形式及其数目、图标样式以及默认按钮；标题文本为指定对话框标题栏的文本。
第9题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。
第10题：
在窗体中添加一个命令按钮、一个标签和一个文本框，并将文本框的Text属性置空，编写命令按钮Command1的Click事件代码：
程序运行后，在文本框中输入20，单击命令按钮后，标签中的内容为（ ）。
A. 20是一个奇数
B. 20
C. 20是一个偶数
D. 2
A) 【解析】本题考查函数调用以及IIf函数。IIf函
数可用于执行简单的条件判断操作，其格式为result=IIf(<条件>，<True部分>，<False部分>)，其中“result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为真时，IIf函数返回“True部分”的值，而当“条件”为假时返回“False部分”的值。“True部分”或“False部分”可以是表达式、变量或其他函数。函数fun(n)的功能是判断n是否为偶数，是偶数则返同True，否则返回False。输入20时，fun返回True，则Commandl的单击事件中IIf语句得到“奇数”。