1、国家二级 VB机试（常用标准控件）模拟试卷 7及答案与解析 一、选择题 1 为了使标签 Label1透明且不具有边框，以下正确的属性设置是 （ A） Label1 BackStyle=0 Lahel1 BorderStyh=l （ B） Label1 BackStyle=0 Label1 BorderStyle=0 （ C） Label1 BackStyle=1 Label1 BorderStyle=1 （ D） Label1 BackStyle=1 Label1 BorderStyle=0 2 下列不包含滚动 条的控件是 （ A）列表框 （ B）标签 （ C）组合框 （ D）文本框 3 窗体
2、上有 2个名称分别为 Text1和 Text2的文本框。编写如下程序： Private Sub Form_Load() Text1 Text=“ Text2 Text=“ End Sub Private Sub Command1_Click() Print Text1 Text+Text2 Text End Sub 程序运行后，在 Text1和 Text2中依次输入 100和 200，并单击命令按钮Command1，则输出结果为 （ A） 100 （ B） 200 （ C） 300 （ D） 100200 4 窗体上有 个名称为 Command1的命令按钮，一个名称为 Text1的文本框，其T
3、ext属性值为 “VB Programming”。运行程序后，选中其中的 “VB”，并执行如下事件过程： Private Sub Command1_Click() Text1 SelTaxt=“C+“ End hub 则文本框中显示的内容为 （ A） VB （ B） VB Programming （ C）文本框被清空 （ D） C+Programming 5 为使文本框具有初始值 “VB”，在设计阶段正确的操作是 （ A）选中该文本框，在属性窗口中把 Text属性的值改为 “VB” （ B）选中该文本框，在属性窗口中把 Caption属性的值改为 “VB” （ C）双击该文本框，在弹出的窗口中
4、输入 “VB” （ D）单击该文本框，在该文本框中直接输入 “VB” 6 在设计阶段，假定在图片框 Picture1中装入了一个图形，为了删除该图片框控件，应采用的正确操作是 （ A）选择图片框，然后按 Del键 （ B）执行语句 Picture1 Picture=LoadPicture(“) （ C）执行语句 Picmre1 Picture=“ （ D）选择图片框，在属性窗口中选择 Picture属性，然后按回车键 7 设窗体上有一个 Picture1图片框，要求在图片框中的指定位置 (坐标为 (500， 300)输出 “OK“，下面可以实现这一功能的事件过程是 （ A） Private S
5、ub Form_Click() Picture1 CurrentX=500 Picture1 CurrentY=300 Picture1 Pnnt“OK“ End Sub （ B） Private Sub Form_Click() Picture1 Left=500 Picture1 Top=300 Picture1 Print“OK“ End Sub （ C） Private Sub Form_Click() Picture1 CurrentX=500 Picture1 CurrentY=300 Print“OK“ End Sub （ D） Private Sub Form_Click()
6、Pieture1 kft=500 Picture1 Top=300 Print“OK“ End Sub 8 已知图片框 Picturel中已装入一个图形，为了在不删除图片框的前提下，清除该图形，应采取的正确操作是 （ A）在设计阶段选择图片框 Picture1，并按 Delete键 （ B）在运行期间执行语句 Picture1 Picture=LoadPicture(“) （ C）在运行期间执行语句 Picture1 Picture=“ （ D）在设计阶段先选中图片框 Picture1，再在属性窗口中选择 Picture属性，最后按 Enter键 9 以下不能用形状控件画出的图形是 （ A）矩
7、形 （ B）圆形 （ C）椭圆 （ D）扇形 10 以下关于命令按钮的叙述中正确的是 （ A）命令按钮上可以显示图片 （ B）命令按钮能够分别响应单击、双击事件 （ C）程序运行时，不能改变命令按钮上的文字 （ D）若命令按钮的 Cance1属性设为 True，焦点在其他控件上时，按下回车键与单击该按钮的效果相同 11 命令按钮不支持的事件为 （ A） Click （ B） DblClick （ C） GotFocus （ D） MouseMove 12 为了使一个复选框被禁用 (灰色显示 )，应把它的 Value属性设置为 （ A） 0 （ B） 1 （ C） 2 （ D） False 13
8、 判断复选框是否被选中的属性为 （ A） Selected （ B） Checked （ C） Value （ D） Index 14 如果在列表框 List1中没有选中项目，则 List1 ListIndex的值为 （ A） -1 （ B） 0 （ C） 1 （ D） 2 15 设窗体上有一个名称为 List1的列表框和一个名称为 Check1的复选框数组 (下标从 0开始 )。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把 该复选框标题删除。 Private Sub Check1_Click(Index As Integer)
9、 For k=0 To List1 ListCount-1 If Check1(Index) Caption=List1 List (k)Then Exit For End If Next k If k List1 ListCount Then List1 RemoveItem k Else List1 AddItem_ End If End Sub 为使上面程序可以实现该功能， 程序代码中横线上应该填入的代码是 （ A） k （ B） Check1 Caption （ C） Check1(k) （ D） Check1(Index) Caption 16 窗体上有 1个名称为 Label1的标
10、签； 1个名称为 List1，且含有若干表项的列表框。为了使得单击 List1中某个表项时，在 Label1中相应地显示该表项，应使用的程序代码为 （ A） Private Sub List1_Click() Label1 Caption=List1 Index End Sub （ B） Private Sub List1_Click() Label1 Caption=List1 ListCount End Sub （ C） Private Sub List1_Click() Label1 Caption=List1 Text End Sub （ D） Private Sub List1_Cl
11、ick() Label1 Caption=List1 Selected End Sub 17 窗体上有一个名为 List1的列表框和一个名为 Command1的命令按钮，并有下面的事件过程： Private Sub Command1_Click() n =List1 ListIndex If n 0 Then ch$=List1 List(n) List1 List(n)=List1 List(n-1) List1 List(n-1)=ch End If End Sub 程序运行时，选中 1个列表项，然后单击 Command1按钮，则产生的结果是 （ A）若选中的不是最前面的列表项，则选中的列
12、表项与它前一个列表项互换位置 （ B）选中的列表项与它前面的列表项互换位置 （ C）若选中的不是最后面的列表项，则选中的列表项与它后一个列表项互换位 置 （ D）选中的列表项与它后面的列表项互换位置 18 通过一个属性可以获得文件列表框中当前被选中文件的文件名，这个属性是 （ A） Dir （ B） Path （ C） Drive （ D） FileName 19 若要清除列表框控件中的所有列表项，应该使用的方法是 （ A） Bemovehem （ B） Clear （ C） Delete （ D） Refresh 20 窗体上有一个名称为 Combo1的组合框，为了引用 Combo1中最后一
13、个列表项，应使用的表达式是 （ A） Combo1 List(ListCount) （ B） Combo1 List(Combo1 ListCount-1) （ C） Combo1 List(ListCount-1) （ D） Combo1 List(Combo1 ListCount) 21 下列关于水平滚动条的叙述中，错误的是 （ A） Value属性值表示单击滚动条两端的箭头时，滚动框向左或向右移动的增量 （ B） Scroll事件在鼠标拖动滚动框时产生 （ C）用鼠标拖动滚动框后，会触发 Change事件 （ D）单击滚动条两端箭头时，会触发 Change事件 22 在窗体上画 一个水平
14、滚动条，其属性值满足 Min Max。程序运行后，如果单击滚动条右端的箭头。则 Value属性值 （ A）增加一个 SmallChange量 （ B）减少一个 SmallChange量 （ C）增加一个 LargeChange量 （ D）减少一个 LargeChange量 23 窗体上有一个名称为 Shape1并显示为圆的形状控件 (其 Width和 Hei出属性值相等 )，一个名称为 Timed的计时器，并有下面程序代码： Dim r As Single， flag As Integer Private Sub Form_Load() r=Shape1 Width Timer1 Enable
15、d=True Timer1 Interval=500 End Sub Private Sub Timer1_Timer() If flag=0 Then Shape1 Width=Shape1 Width-10 If Shape1 Width =100Then flag=1 End If Else Shape1 Width=Shape1 Width+10 If Shape1 Width =r Then flag=0 End If End If End Sub 运行程序后产生的结果是 （ A）圆逐渐缩小，再逐渐增大，然后再逐渐缩小，依此往复 （ B）圆一直在缩小 （ C）圆每隔 0 5秒向右移动
16、一次 （ D）圆每隔 1秒向下移动一次 24 下列不属于计时器控件属性的是 （ A） Enabled （ B） Interval （ C） Index （ D） Visible 25 以下可以作为 “容器 ”的控件是 （ A）框架 （ B）图像框 （ C）标签 （ D）命令按钮 26 以下关于控件的叙述中，正确的是 （ A）标签控件能够获得焦点 （ B）不能对列表框中的列表项进行多项选择 （ C）命令按钮的外观可以被设置为图形 （ D）设置形状控件的 Shape属性，可以使其呈现为直线 国家二级 VB机试（常用标准控件）模拟试卷 7答案与解析 一、选择题 1 【正确答案】 B 【试题解析】 B
17、ackStyle属性用于设置标签的背景样式，有两种值可选： 0，表示透明； 1，表示不透明。 BorderStyle属性用来设置标签的边框类型，有两种值可选： 0，代表标签无边框； 1，代表标签有边框。 【知识模块】 常用标准控件 2 【正确答案】 B 【试题解析】 标签控件不包含滚动条。 【知识模块】 常用标准控件 3 【正确答案】 D 【试题解析】 单击命令按钮 Command1，触发 Command1_Click()事件， Print语句连续输出文本框 Text1和 Text2的 text值。选 D。 【知识模块】 常用标准控件 4 【正确答案】 D 【试题解析】 文本框 SelText
18、属性返回或设置包含当前所选择文本的字符串；如果没有字符被选中，则为零长度字符串 (“)。由题意知，选中 “VB”，返回“C+”，所以结果为 “C+Programming”。 【知识模块】 常用标准控件 5 【正确答案】 A 【试题解析】 根据题意，选中该文本框，在属性窗口中把 Text属性的值改为“VB”。 【知识模块】 常用标准控件 6 【正确答案】 A 【试题解析】 删除图片框控件，先选择图片框，然后按 Del键。 【知识模块】 常用标准控件 7 【正确答案】 A 【试题解析】 VB中，窗体和图片框具有 CurrentX、 CurrentY属性，经常用这两个属性来设置当前绘图点。 VB中在
19、图片框特定位置显示文本 ： Picture1 CurrentX=X座标设置当前 X方向座标 Picture1 CurrentY=Y座标设置当前 Y方向座标 Picture1 Print文本内容 “在当前位置输出文本。 【知识模块】 常用标准控件 8 【正确答案】 B 【试题解析】 如果图片框已装入了一个图形，在不删除图片框的前提下要想清除该图形有两种方法。一是在设计阶段在图片框的属性窗口中删除图片框控件Picture属性行后边的 “(Bitmap)“，另一种方法是在程序运行阶段使用LoadPicmre(“)装一个空文件， 这样也能清除图形。 【知识模块】 常用标准控件 9 【正确答案】 D 【
20、试题解析】 形状控件 (Shape)提供了显示一些规则图形的简易方法，通过设置形状控件 Shape属性值，可显示 6种图形： 0-矩形、 1-正方形、 2-椭圆、 3-圆、 4-圆角矩形、 5-圆角正方形。 【知识模块】 常用标准控件 10 【正确答案】 A 【试题解析】 按钮控件的 Picture属性可以给命令按钮指定一个图形。按钮的标题由属性 Caption设置，可以在程序中动态指定。当一个命令按钮的 Cance1属性被设置 为 True时，按 ESC键与单击该命令按钮的作用相同。命令按钮能够响应单击事件，但不能响应双击事件。 【知识模块】 常用标准控件 11 【正确答案】 B 【试题解析
21、】 命令按钮支持的事件有 Click， GotFocus和 MouseMove，不支持DblClick事件，故选 B。 【知识模块】 常用标准控件 12 【正确答案】 C 【试题解析】 复选框的 Value属性可以设置为 0、 1或 2。 0表示没有选择该复选框， 1表示选中该复选框， 2表示该复选框被禁用 (灰色显示 )。 【知识模块 】 常用标准控件 13 【正确答案】 C 【试题解析】 复选框组常用于提供多重选择， Value属性值决定每个复选框的选中状态： 0为未选、 1为选中、 2为不可用 (以灰色呈现 )。选 C。 【知识模块】 常用标准控件 14 【正确答案】 A 【试题解析】
22、列表框 List1中没有选中项目，则 List1 Listlndex的值为 -1。 【知识模块】 常用标准控件 15 【正确答案】 D 【试题解析】 题干给出的是没有该复选框的标题时，把该复选框的标题添加到列表框中。 List1 AddItem可以为列表框添加新项。需要添加的项要根据索引添加。选 D。 【知识模块】 常用标准控件 16 【正确答案】 C 【试题解析】 单击 List1中某个表项时触发 List1_Click()事件。标签的 Caption属性用于设置标签中所要显示的内容。列表框的 text属性为 List1中表项的正文，通过这个属性可以得到被选中的项目。因此选 C。 【知识模块
23、】 常用标准控件 17 【正确答案】 A 【试题解析】 当单击 Command1按钮后， List1列表框中被选中项的索引值赋给变 量 n，如果被选中项不是空也不是第 1项时，将选中项的项目文字赋值给变量ch，用选中项的上面一项的文字替换选中项的文字，再把变量 ch中的文字替换选中项上面一项的文字，简单说就是选中项和它上面一项的文字交换。因此 A选项的说法正确。 【知识模块】 常用标准控件 18 【正确答案】 D 【试题解析】 FileName属性用来设置或返回程序运行过程中当前选中的文件名称。 Path属性用来设置或返回程序运行过程中当前选中的文件的路径。 【知识模块】 常用标准控件 19
24、【正确答案】 B 【 试题解析】 Clear方法用来清除列表框中的全部内容，格式为：列表框 Clear。 【知识模块】 常用标准控件 20 【正确答案】 B 【试题解析】 组合框中的 List属性用来列出表项的内容。该属性保存了列表框中所有数组的值，可以通过下标访问数组中的值 (下标从 0开始 )，其格式为： 组合框 List(下标 )，特别注意的是 “下标 ”相当于索引值，指示着表项中某一项表中内容的位置，第 1项的索引值为 0，第 2项为 1，依次类推，这个参数非常重要不可省略。组合框中列表项的排列是从 0开始，最后一项的索引值应 为 ListCount-1。 【知识模块】 常用标准控件
25、21 【正确答案】 A 【试题解析】 当滚动框移动时，触发 Change事件。 Value属性是滚动条的当前位置值，其返回值始终介于 Max和 Min属性值之间，包括这两个值。选 A。 【知识模块】 常用标准控件 22 【正确答案】 A 【试题解析】 当水平滚动条的属性值 Min Max时，如果单击滚动条右端或左端的箭头， Value属性值会增加或减少 SmallChange量；如果单击滚动块和右端箭头之间空白的地方时， Value属性值 会增加 LargeChange量，反之，减少LargeChange量。本题单击的是滚动条右端的箭头，故 Vlaue属性值应该是增加一个 SmallChang
26、e量。故选 A。 【知识模块】 常用标准控件 23 【正确答案】 A 【试题解析】 Form_Load过程中设定 timer事件定时触发；在 Timer1_Timer过程中，圆圈先变小后变大，然后退出。下一次 timer事件触发时继续这个过程。因此，选 A。 【知识模块】 常用标准控件 24 【正确答案】 D 【试题解析】 计时器控件属性 包括 Enabled、 Interval和 Index等属性，不包括Visible属性。选 D。 【知识模块】 常用标准控件 25 【正确答案】 A 【试题解析】 窗体控件、框架控件和图片框控件可以作为其他控件的容器。选A。 【知识模块】 常用标准控件 26 【正确答案】 C 【试题解析】 标签、框架、菜单、直线、形状、图像框、计时器都不能接收焦点，选项 A错误；列表框用于显示可供做单一或多个选择的列表项，选项 B错误；形状控件 (Shape)提供了显示一些规则图形的简易方法，通过设置形状 控件Shape属性值，可显示 6种图形： 0-矩形、 1-正方形、 2-椭圆、 3-圆、 4-圆角矩形、 5-圆角正方形，选项 D错误。 【知识模块】 常用标准控件
