单选题在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（ ）。A ShowText过程的参数类型可以是ControlB ShowText过程的参数类型可以是VariantC 两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）D
题目
ShowText过程的参数类型可以是Control
ShowText过程的参数类型可以是Variant
两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）
ShowText过程中的T是控件变量
相似考题
更多“在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一”相关问题
-
第1题：
请根据以下各题的要求设计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所示。
-
第2题：
在窗体上画两个文本框，名称分别为T1、T2，初始情况下均为空白，编写适当的事件过程。程序运行后，如果在T1中输入字符，则所输入的字符立即在T2中显示出来，并把小写字母转换为相应的大写字母，如图1—1所示。
要求：程序中不得使用任何变量。
注意：存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
2．在窗体上画二个文本框，名称为Text1和Text2，内容为空；再画二个标签，名称分别为L1和L2，标题分别为“输入A，B，C：”和“A×B+C＝”；再画一个命令按钮，名称为C1，标题为“运算”。编写适当的程序。程序运行时，在文本框Text1中输入用逗号隔开的3个整数A、B、C，单击“运算”按钮，则计算出A×B+C的值，显示在文本框Text2中。程序运行结果如图1—2所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：① 启动Visual Basic在窗体上画两个文本框。 ② 按F4键激活属性窗口在属性窗口中设置文本框的属性见表1。
③ 编写命令按钮的Click事件过程：
Private Sub T1_change()
T2. Text＝UCase(T1. Text)
End Sub
2．① 对象主要属性设置如表2所示。
② 分析：按试题要求在窗体上画两个文本框、两个标签和一个单选按钮并分别将它们的属性按表2的内容进行设置。Split()函数返回一个下标从零开始的一维数组它包含指定数目的子字符串。Val()函数返回包含于字符串内的数字字符串中是一个适当类型的数值。CStr()函数将一数值转换为字符串。
③ 编程代码：
Private Sub C1_Click()
Dim a
a＝Split(Text1.Text"")
Text2.Text＝CStr(Val(a(0))
* Val(a(1))+Val(a(2)))
End Sub
① 启动Visual Basic，在窗体上画两个文本框。 ② 按F4键激活属性窗口，在属性窗口中设置文本框的属性，见表1。
③ 编写命令按钮的Click事件过程：
Private Sub T1_change()
T2. Text＝UCase(T1. Text)
End Sub
2．① 对象主要属性设置如表2所示。
② 分析：按试题要求在窗体上画两个文本框、两个标签和一个单选按钮，并分别将它们的属性按表2的内容进行设置。Split()函数返回一个下标从零开始的一维数组，它包含指定数目的子字符串。Val()函数返回包含于字符串内的数字，字符串中是一个适当类型的数值。CStr()函数将一数值转换为字符串。
③ 编程代码：
Private Sub C1_Click()
Dim a
a＝Split(Text1.Text,",")
Text2.Text＝CStr(Val(a(0))
* Val(a(1))+Val(a(2)))
End Sub
-
第3题：
在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图1所示)，则空白处应填入的内容是（ ）。
A. Geffocus
B. Click
C. Change
D. LostFocus
正确答案：C
C) 【解析】本题考查文本框的事件。文本框的GetFocus事件为文本框获得焦点时触发一次，而单击文本框时触发一次Click事件，Change事件是每次文本框中的文本发生改变时触发的事件，而LostFocus事件是文本框失去焦点时触发的事件。
-
第4题：
注意：下面出现的“考生文件夹”均为c：\wexam\25160001。
(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在“属性”窗口中设置它的属性值，使之满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图19-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm
(2) 在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个子菜单项，名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程，使得程序运行时，单击“复制”菜单项，则把 Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：滚动条的最大值由Max属性设置最小值由Min属性设置。鼠标卓击滚动条上滚动框以外的区域(不包括两边按钮)滑块移动的增量值由LargeChange属性设置。标签上的标题由Caption属性设置控件的名称由Name属性设置。解题步骤： 第一步：建立界面并设置控件属性。程序用到的控件及其属性见表19-2。
第二步：调试并运行程序。
第三步：按题目要求存盘。
(2)在Visual Basic中菜单项通过“菜单编辑器”窗口建立在窗体上单击右键选择“菜单编辑器”选项可以打开“菜单编辑器”窗口；文本框的内容由Text属性设置其形式为：
文本框名．Text=要显示的内容。解题步骤：
第一步：建立界面并设置控件属性。程序中用到的菜单项和控件的属性见表19-3。
第二步：编写程序代码。
参考代码：
Option Explicit
Private Sub Clear_Click()
Text2.Text=""
End Sub
Private Sub Copy_Click()
Text2.Text=Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
滚动条的最大值由Max属性设置，最小值由Min属性设置。鼠标卓击滚动条上滚动框以外的区域(不包括两边按钮)滑块移动的增量值由LargeChange属性设置。标签上的标题由Caption属性设置，控件的名称由Name属性设置。解题步骤： 第一步：建立界面并设置控件属性。程序用到的控件及其属性见表19-2。
第二步：调试并运行程序。
第三步：按题目要求存盘。
(2)在Visual Basic中，菜单项通过“菜单编辑器”窗口建立，在窗体上单击右键选择“菜单编辑器”选项可以打开“菜单编辑器”窗口；文本框的内容由Text属性设置，其形式为：
文本框名．Text=要显示的内容。解题步骤：
第一步：建立界面并设置控件属性。程序中用到的菜单项和控件的属性见表19-3。
第二步：编写程序代码。
参考代码：
Option Explicit
Private Sub Clear_Click()
Text2.Text=""
End Sub
Private Sub Copy_Click()
Text2.Text=Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
-
第5题：
在窗体上画两个单选按钮(名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”)、1个复选框(名称为Checkl，标题为“粗体”)和1个文本框(名称为Text1．Text属性为“改变文字字体”)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是（ ）
正确答案：D
Value属性用来表示复选框或单选按钮的状态。对于单选按钮来说，Value属性可设置为True或False。当设置为True时，该单选按钮是“打开”的，按钮的中心有一个圆点；如果设置为False，则该单选按钮是“关闭”的，按钮是一个圆圈。对于复选框来说，Value属性可以设置为0、1或2。其中：0——表示没有选择该复选框；1——表示选中该复选框；2——表示该复选框被禁止(灰色)。 -
第6题：
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1)，外观如下图所示。
编写如下程序： Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.TextA．4
B．6
C．8
D．12
正确答案：D
-
第7题：
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上创建两个名称分别为Option1和Option2，标签分别为“教授”和“研究员”的单选按钮，再建立一个名称为Label1的标签，实现如下功能：当选中“教授”时，标签上显示“博士学位以上”，如果选中“研究员”，则标签上显示“硕士学位以上”，结果如图67-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在名称为Form1的窗体上画两个名称分别为Text1和Text2、内容都为空的文本框，再画一个命令按钮，其名称为Command1、标题为“判断”。编写适当的事件过程，要求程序运行后，如果在Text1中输入一个数，单击命令按钮Command1，判断输入的是否为偶数，如图67-2所示。要求：不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sj2．vbp，窗体文件名为sj2．frm。
正确答案：(1)根据题意，新建“标准EXE”工程，在窗体上添加一个Label控件和两个Option控件，设置Label1的名称为Label1、Caption属性为空，Option的名称分别为Option1和Option2、Caption属性分别为“教授”和“研究员”。设计完成后，进入代码窗口编写如下代码：
(2)根据题意，新建“标准EXE”工程，在窗体上添加两个Text控件和一个Command控件，Text的名称分别为Text1和Text2、Text属性均为空，Command的名称为Command1、Caption属性为“判断”。双击Command1命令按钮，编写如下代码：
-
第8题：
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先，后显示两个文本框中的内容，如下图所示。
注意：
要求程序中不得使用任何变量；文件必须存放在考生文件夹中；工程文件名为 execise51.vbp，窗体文件名为execise51.frm。
正确答案：
-
第9题：
（1）在名称为Form1的窗体中绘制一个名称为Label1的标签，其标题为空，BorderStyle属性为1；再添加一个名称为Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得运行时，标签中的数字每隔1秒钟加2。程序运行效果如图61-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在窗体上设置一个文本框，名称为Text1，再添加一个命令按钮，名称为Command1，标题为“当前时间／日期切换”；每次单击按钮时，Text1就显示出当前时间，再单击一次，Text1就显示当前日期。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图61-2所示。
注意：要求考生在编写完程序后，把工程文件与窗体文件保存到考生文件夹下，文件名分别为sj2．vbp与sj2．frm。
正确答案：(1)计时器的Interval属性用于设置每次触发计时器的Timer事件的时间间隔，单位为毫秒。Enabled属性控制计时器是否开始启用，True表示启用，False表示不启用。 根据题意，新建“标准EXE”工程，将一个标签和一个计时器控件添加到窗体中，标签的名称为Label1、Caption属性为“0”，Timer的名称为Timer1、Interval属性为“1000”。 设置完成后双击Command1进入代码窗口，编写如下代码：
(2)根据题意，新建“标准EXE”工程，将一个文本框控件和一个命令按钮添加到窗体中，文本框的名称为Text1、Text属性为空，命令按钮的名称为Command1、Caption属性为“当前时间／日期切换”。双击Command1进入代码窗口，编写如下代码：
-
第10题：
在名为Form1的窗体上绘制两个文本框，其名称分别为Text1和Text2，它们的高、宽分别为400、2500和1500、2500。窗体的标题为“窗体窗口”。请通过属性窗口设置适当的属性满足以下要求：
(1)Text2可以显示多行文本，且有垂直和水平两个滚动条。
(2)运行时在Text1中输入的字符都显示为“*”。
运行后的窗体如下图所示。
注意：
文件必须存放在考生文件夹中，工程文件名为execise53.vbp，窗体文件名为 execiSe53.frm。
正确答案：
-
第11题：
在窗体上画一个文本框(名称为Textl)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以F可以实现上述操作的事件过程是（ ）
正确答案：A
当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在Textl_Change()事件中。Len(字符串)的功能是测试字符串的长度。所以正确答案选A)。 -
第12题：
单选题在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（ ）。AShowText过程的参数类型可以是Control
BShowText过程的参数类型可以是Variant
C两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）
DShowText过程中的T是控件变量
正确答案： A解析：
Visual Basic允许将窗体和控件作为通用过程的参数。文本框也是控件，因此可以向过程传递。本题中是将文本框型作为参数，因此实参应为文本框对象而不是对象的某个属性值，程序代码中的两个过程调用语句是正确的。 -
第13题：
在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text属性为“改变文字字体”。要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中(窗体外观如图16-2所示)，则能够实现上述要求的语句序列是______。
A．Optionl. Value=True Checkl. Value=False
B．Optionl. Value=True Checkl. Value=True
C．Option2. Value=False Checkl. Value=True
D．Optionl. Value=True Checkl. Value=1
正确答案：D
解析：OptionButton(单选按钮)的Value属性应设置为True或False，而CheckBox(复选框)的Value属性应设置为0、1或2(对应控件常数为vbUnchecked、vbChecked或vbGraycd)。 -
第14题：
在名称为Form1的窗体上画两个文本框，名称分别为Text1、Text2，都没有初始内容，再画3个命令按钮，名称分别为Command1、Command2、Command3，标题分别为“显示”、 “隐藏”、 “复制”。程序运行时，向Text1中输入的所有字符，都显示“*”。单击“显示”按钮后，在Text1中显示所有字符。再单击“隐藏”按钮后，Text1中的内容不变但显示的都是“?”。单击“复制”按钮后，把Text1中的实际内容复制到Text2中，如图25所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。
正确答案：1．操作步骤 (1)在Visual Basic集成环境中选择“文件”→“新建工程”命令在“新建工程”对话框中选择“标准EXE”选项单击“确定”按钮。 (2)在工具箱中选择Label控件在窗体上创建两个Label控件。在属性窗口中设置名称分别为Label1、Label2Caption属性为“口令1”、“口令2”。 (3)选择工具箱中的TextBox控件在窗体上创建在属性窗口中设置名称为Text1、 Text2设置Text属性为空。在属性窗口设置Text1的PasswordChar属性为“*”这样在密码输入的时候Text文本显示为“*”。 (4)选择工具箱中的命令按钮控件在窗体上用鼠标拖动创建三个命令按钮名称分别为Command1、Command2、Command3在属性窗口设置Caption属性为“显示”、“隐藏”、“复制”。 2．行为编码 (1)在代码编辑器中选择Command1对象和Click事件其行为代码如下： Private Sub Command1_Click() Text1.PasswordChar=" " End Sub (2)在代码编辑器中选择Command2对象和Click事件其行为代码如下： Private Sub Command2_Click() Text1.PasswordChar="?" End Sub (3)在代码编辑器选择Command3对象和Click事件其行为代码如下： Private Sub Command3_Click() Text2.Text=Text1.Text End Sub 3．存盘保存 执行“文件”→“保存工程”命令工程文件名为ylc5.vbp窗体文件名为ylc5.frm。
1．操作步骤 (1)在Visual Basic集成环境中选择“文件”→“新建工程”命令，在“新建工程”对话框中选择“标准EXE”选项，单击“确定”按钮。 (2)在工具箱中选择Label控件，在窗体上创建两个Label控件。在属性窗口中设置名称分别为Label1、Label2，Caption属性为“口令1”、“口令2”。 (3)选择工具箱中的TextBox控件，在窗体上创建，在属性窗口中设置名称为Text1、 Text2，设置Text属性为空。在属性窗口设置Text1的PasswordChar属性为“*”，这样在密码输入的时候Text文本显示为“*”。 (4)选择工具箱中的命令按钮控件，在窗体上用鼠标拖动创建三个命令按钮，名称分别为Command1、Command2、Command3，在属性窗口设置Caption属性为“显示”、“隐藏”、“复制”。 2．行为编码 (1)在代码编辑器中选择Command1对象和Click事件，其行为代码如下： Private Sub Command1_Click() Text1.PasswordChar=" " End Sub (2)在代码编辑器中选择Command2对象和Click事件，其行为代码如下： Private Sub Command2_Click() Text1.PasswordChar="?" End Sub (3)在代码编辑器选择Command3对象和Click事件，其行为代码如下： Private Sub Command3_Click() Text2.Text=Text1.Text End Sub 3．存盘保存 执行“文件”→“保存工程”命令，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。 解析：(1)本题通过不同的角度考查考生对TextBox控件的PasswordChar属性的设置、Text属性的操作和使用。(2)设置Text1的PasswordChar属性为“?”，表示显示在Text1的文本框中的文本都以“?”符号代替。(3)由于Text2没有设置PasswordChar属性，因此文本在Text2中以明文的形式显示出来。 -
第15题：
窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明
当单击“保存”按钮时．将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
正确答案：C
把数据写入文件使用Put，排除B和D。写入随机文件需要长度参数，排除A，选择C项。 -
第16题：
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1标签，窗体外观如图a所示，要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：
Private Sub Text1_Change（ ）
Call ShowText(Text1)
End Sub
Private Sub Text2_Change（ ）
Call ShowText(Text2)
End Sub
Private Sub ShowText(T As TextBox)
Labell．Caption="文本框中的内容是："＆T．Text
End Sub
关于上述程序，以下叙述中错误的是（ ）。
A.ShowText过程的参数类型可以是Control
B.ShowText过程的参数类型可以是Variant
C.两个过程调用语句有错，应分别改为Call ShowText(Text1，Text)、Call Show Text (Text2，Text)
D.ShowText过程中的T是控件变量
正确答案：C
C。【解析】两个过程中不能改为CallShowText(Textl．Text)和CallShowText(Text2．Text)因为此时会产生形参和实参不匹配。 -
第17题：
在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填( )。
Private Sub Text1_ _________() TextText=Text1.Text End Sub
A．SetFocus
B．Change
C．GetFocus
D．Click
正确答案：B
解析：当在文本框中输入文本的时候，将会发生文本框的Change事件，在该事件中把该文本框的Text属性赋值给另一文本框的Text属性，就可使另一个文本框显示的内容为该文本框显示的内容。 -
第18题：
新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、TexQ和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框删后其中输出两个数的和。如图14所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体丈件名为ylc2.frm。
正确答案：Visual Basic集成环境中执行“文件”→“新建工程”命令选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择标签控件在窗体中要求位置画出3个标签其Caption属性分别为“加数1”、“加数2”和“和”。 (3)在工具箱中选择文本框控件在窗体上创建3个文本框。双击文本框Text3弹出代码窗口添加代码： Private Sub Text3 click() Text3=Val(Text1)+Val(Text2) End Sub (4)按F5键运行程序。如图14所示。 (5)执行“文件”→“保存工程”命令将工程文件命名为yle2.vbp窗体文件命名为ylc2.frm。
Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择标签控件，在窗体中要求位置画出3个标签，其Caption属性分别为“加数1”、“加数2”和“和”。 (3)在工具箱中选择文本框控件，在窗体上创建3个文本框。双击文本框Text3弹出代码窗口，添加代码： Private Sub Text3 click() Text3=Val(Text1)+Val(Text2) End Sub (4)按F5键运行程序。如图14所示。 (5)执行“文件”→“保存工程”命令，将工程文件命名为yle2.vbp，窗体文件命名为ylc2.frm。 解析：(2)第2小题中，利用Val函数将输入的字符串转换为数值进行计算。 -
第19题：
在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“姓名”和“年龄”）、两个文本框（名称分别为Textl和Text2，初始内容均为空）和一个命令按钮（名称为Command1，标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输人姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
正确答案：【考点分析】本题考点有：标签的Name和Caption属性、文本框Name和Text属性、命令按钮的Name和Caption属性、“＆”和“+”运算符以及Print方法。
【解题思路】通过标签的Name和Caption属性设置标签的名称和标题，通过文本框Name和Text属性设置文本框的名称和文本，通过命令按钮的Name和Caption属性设置命令按钮的名称和标题，“＆”和“+”运算符均可将两个表达式作为字符串连接。在窗体上输出文本内容可使用Print方法。
【操作步骤】
步骤1：新建一个窗体，按照题目要求建立控件并设置相应属性，程序中用到的控件及属性如表3．16所示。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Command1_Click()
Form1．Print Text1．Text＆"，现年"＆
Text2．Text＆"岁"
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。 -
第20题：
（1）在名为Form1的窗体上绘制两个标签（名称分别为Label1和Label2，标题分别为“长”和“宽”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入”）。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个“输入”对话框，在两个“输入”对话框中分别输入长和宽，并分别在两个文本框中显示出来，运行后的窗体如图21-1所示。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。
注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
正确答案：(1)根据题意，新建“标准EXE”工程，在窗体上添加两个标签，名称分别为Label1和Label2、Caption属性分别为“长”和“宽”，两个文本框，名称分别为Text1和Text2、Text属性为空，一个命令按钮，名称为Command1，Caption属性为“输入”。设计完成后，双击Command1进入代码窗口，编写如下代码：
(2)根据题意，新建“标准EXE”工程，在窗体上添加一个标签，其名称为Label1，标题为“输入”，一个文本框，其名称为Text1、Text属性为空，一个命令按钮，其名称为Com-mand1、标题为“显示”。窗体设计完成后，双击Command1命令按钮，编写如下代码：
-
第21题：
在窗体上绘制出3个文本框，名称分别为Text1、Text2和Text3。要求程序运行时，焦点位于Text1，当按Tab键时，焦点从Text1越过Text2直接跳到Text3上。本题不得使用任何变量。程序运行时的窗体界面如图2—2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。正确答案：
本题考查Tablndex属性和TabStop属性的使用。
通常在Visual Basic窗体上画控件时，系统会自动为其分配Tab键顺序(Menu、Timer、Data、Image、Line、Shape等控件除外)．运行时被设置为不可见或无效或不能接受焦点的控件仍可保持在Tab顺序中，但用Tab键切换时会跳过这些控件。TabStop属性用于设置可否使用Tab键移动焦点到控件，值为True表示可以，值为False表示不可以。
根据题意，新建“标准EXE”工程，将3个文本框控件添加到窗体中，文本框的名称分别为Text1、Text2 和Text3、Text属性分别为“Text1”、“Text2”和“Text3”，其中Text2的TabStop属性为False，其他两个的TabStop属性为True。
单击 按钮运行程序，并按要求保存。
-
第22题：
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如下图所示。
注意：
程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise57.vbp，窗体文件名为execise57.frm。
正确答案：
-
第23题：
在窗体上画一个名称为Op1的单选按钮控件数组，其包含4个单选按钮，Index值从0到 3，标题分别为“答案1”、“答案2”、“答案3”和“答案4”；再画一个命令按钮，名称为C1，标题为“选择”；再画一个文本框Text1，名称为Text1，内容为空白。编写适当的程序。程序运行时，单击“选择”按钮，只有选择“答案1”单选按钮时，在Text1文本框中显示“选择正确”，否则显示“选择错误”。程序运行结果如图2—1所示。
注意，保存时必须存放在考生文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。
2．在考生文件夹中有工程文件sjt4.vbp，其中包含窗体Form1，该程序是不完整的。请在有?号的地方填入正确内容，然后删除?及所有注释符(即'号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：
在窗体上有三个名称分别为Text1、Text2、Text3的文本框，一个名称为Command1，标题
为“计算”的命令按钮(如图2—2所示)。要求程序运行后，在Text1和Text2中分别输入两个整数，单击“计算”按钮后，可把两个整数之间的所有整数(含着两个整数)累加起来并在Text3中显示出来。注意：保存时必须放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。
正确答案：① 对象主要属性设置如表3所示。
② 分析：按试题要求在窗体上画一个单选按钮数组(含四个单选按钮)、一个文本框和一个命令按钮并分别将它们的属性按表3的内容进行设置。单选按钮是否被选取由其Value属性来确定当Value值为True时表示单选按钮被选取否则未被选取根据题意只有选择了Op1(0)单选按钮将字符串“选择正确”赋给Text1.Text否则将字符串“选择错误”赋给了Text1.Text。
③ 编程代码：
Private Sub C1_Click()
If Op1(0).Value=True Then
Text1.Text＝"选择正确"
Else
Text1.Text＝"选择错误"
End If
End Sub
2．① 试题提供的程序如下：
Private Sub Command1_Click()
Dim i As Integer
Dim j As Integer
'For i＝Text1.Text To?
'j＝?+i
Next i
Text3.Text＝j
End Sub
② 要完成两个数之间所有整数的累加需要使用循环结构来读取两个数之间所有的整数然后将每一个整数累加到一个变量中。
③ 修改后的程序如下：
Private Sub Command1_Click()
Dim i As Integer
Dim j As Integer
For i＝Text1.Text To Text2.
Text
j=j+i
Next i
Text3.Text＝j
End Su
① 对象主要属性设置如表3所示。
② 分析：按试题要求在窗体上画一个单选按钮数组(含四个单选按钮)、一个文本框和一个命令按钮，并分别将它们的属性按表3的内容进行设置。单选按钮是否被选取由其Value属性来确定，当Value值为True时，表示单选按钮被选取，否则未被选取，根据题意，只有选择了Op1(0)单选按钮，将字符串“选择正确”赋给Text1.Text，否则将字符串“选择错误”赋给了Text1.Text。
③ 编程代码：
Private Sub C1_Click()
If Op1(0).Value=True Then
Text1.Text＝"选择正确"
Else
Text1.Text＝"选择错误"
End If
End Sub
2．① 试题提供的程序如下：
Private Sub Command1_Click()
Dim i As Integer
Dim j As Integer
'For i＝Text1.Text To?
'j＝?+i
Next i
Text3.Text＝j
End Sub
② 要完成两个数之间所有整数的累加，需要使用循环结构来读取两个数之间所有的整数，然后将每一个整数累加到一个变量中。
③ 修改后的程序如下：
Private Sub Command1_Click()
Dim i As Integer
Dim j As Integer
For i＝Text1.Text To Text2.
Text
j=j+i
Next i
Text3.Text＝j
End Su
-
第24题：
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：程序运行后，如果在文本框Text1中输入China Beijing，则在文本框Text2中显示的内容是（ ）。AChina Beijing
BChina
CBeijing
DChinaB
正确答案： A解析：
程序运行后，在文本框Text1中输入字符后，会触发它的Change事件，通过中部截取函数Mid把文本框Text1中的内容从第6个字符“B”开始截取后面的字符，得到“Beijing”字符串，然后把截取的字符串在Text2中显示出来。
