1、国家二级 VB机试（常用标准控件）模拟试卷 28及答案与解析 一、选择题 1 能够存放组合框的所有项目内容的属性是 （ A） Caption （ B） Text （ C） List （ D） Selected 2 要想使列表框只允许单选列表项，应设置的属性为 （ A） Style （ B） Selected （ C） MultiSelect （ D） Enabled 3 下面列表框属性中，是数组的是 （ A） ListCount （ B） Selected （ C） Listlndex （ D） MultiSelect 4 窗体上有一个名称为 Comb01的组合框，要求在其编辑区输入文本并按回
2、车键后，编辑区中的文本被添加到列表中。下面能实现这一功能的是 （ A） Private Sub Combol_keyDown(KeyCode_ As Integer， Shift As Integer) IfKeyCode=13 Then Combo1 Addltem Combo1 Text End If End Sub （ B） Private Sub Combo1_KeyDown(KeyCode_ As Integer， Shift As Integer) IfKeyCode=13 Then Combo1 AddAItem Text1 Text End If End Sub （ C） Pr
3、ivate Sub Combo1_Click() Combo1 Addltem Combo1 Text End Sub （ D） Private Sub Combol_Click() Combo1 Addltem Text1 Text End Sub 5 要将单选按钮 Opt1设为被选中，应设置的属性是 （ A） Value （ B） Selected （ C） Enabled （ D） SetFocus 6 窗体上有一个名称为 Combol的组合框，为了引用 Combol中最后一个列表项，应使用的表达式是 （ A） Combo1 List(ListCount) （ B） Combo1 Lis
4、t(Combo1 ListCount一 1) （ C） Combo1 List(ListCount1) （ D） Combo1 List(Combo1 ListCount) 7 窗体上有一个名称为 Text1的文本框，一个名称为 Combol的组合框。将文本框中的内容添加到组合框中所使用的命令是 （ A） Text1 Addltem Combo1 Text （ B） Combo1 Addltem Text1 Text （ C） Combol Text=Text1 Text （ D） Text1 Text=Combol Text 8 若要清除列表框控件中的所有列表项，应该使用的方法是 （ A）
5、Removeltem （ B） Clear （ C） Delete （ D） Refresh 9 窗体上有名称为 List1的列表框。以下能够将列表框当前选定的列表项替换为字符串 “Basic”的语句是 （ A） List1 Addltem”Basic” （ B） List1 List(List1 Listlndex)=”Basic” （ C） List1 Text=”Basic” （ D）以上都可以 10 要想不使用 Shift或 Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的 MultiSelect属性设置为 （ A） 0-None （ B） 1Simple （ C） 2一 E
6、xtended （ D） 3 11 如果在列表框 List1中没有选中项目，则 List1 Listlndex的值为 （ A）一 1 （ B） 0 （ C） 1 （ D） 2 12 设 Label1、 Command1、 Text1、 Check1分别为标签、命令按钮、文本框、复选框的名称，则以下属性设置语句中，运行时不会出错的是 （ A） Label1 BackStyle=2 （ B） Command1 Style=1 （ C） Text1 ScrollBars=4 （ D） Check1 Value=2 13 下列不包含滚动条的控件是 （ A）列表框 （ B）标签 （ C）组合框 （ D）
7、文本框 14 为了删除列表框中的一个列表项，应使用的列表框方法是 （ A） Move （ B） Remove （ C） Clear （ D） Removeltem 15 以下不能设置 Picture属性的控件是 （ A）窗体 （ B）列表框 （ C）复选框 （ D）命令按钮 16 设窗体上有 1个名称为 List1的列表框，程序运行时，如果选中了第 3个列表项(最上面的列表项为第 0个列表项 )，则下面不成立的是 （ A） List1 Selected(List1 Listlndex)的值为 True （ B） List1 Selected(3)的值为 True （ C） List1 List
8、(3)的值为 True （ D） List1 Listlndex的值为 3 17 下列控件中，不响应 Click事件的是 （ A）框架 （ B）标签 （ C）图像框 （ D）形状 18 设窗体上有一个名称为 Check1的复选框，并有下面程序代码： Private Sub Check1 MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single) Check1 Value=1 End Sub 根据上面的事件过程，可以得出结论 （ A）鼠标单击该复选框，复选框的标题被改为 “1” （ B）鼠标右键单击该复选框，可
9、以选中该复选框 （ C）鼠标左键单击该复选框，它被选中，右键单击它，取消选中 （ D）鼠标右键单击该复选框，它被选中，左键单击它，取消选中 19 设窗体上有一个名称为 List1的列表框，并有若干列表项。下面语句中不能在所有列表项之后 追加一个列表项的是 （ A） List1 List(List1 ListCount)=”VB程序 ” （ B） List1 List(List1 ListCount一 1)=”VB程序 ” （ C） List1 Addltem”VB程序 ” （ D） List1 Addltem”VB程序 ”， List1 ListCount 20 已知列表框控件 List1中已
10、放入若干表项，下列关于 List1的叙述中错误的是 （ A）第一个表项的序号为 0 （ B）没有选中任何一个表项时， Listlndex属性的值为一 1 （ C）最后一个表项 的序号为 ListCount （ D）可用 MultiSelect属性设置是否可多选 21 判断复选框是否被选中的属性为 （ A） Selected （ B） Checked （ C） Value （ D） Index 22 窗体上有 1个名称为 Label1的标签； 1个名称为 List1，且含有若干表项的列表框。为了使得单击 List1中某个表项时，在 Label1中相应地显示该表项，应使用的程序代码为 （ A） P
11、rivate Sub Listl_Click()Label1 Caption=List1 Index End Sub （ B） Private Sub Listl_Click()Label1 Caption=List1 ListCount End Sub （ C） Private Sub Listl_Click()Label1 Caption=List1 Text End Sub （ D） Private Sub Listl_Click()Label1 Caption=List1 Selected End Sub 23 以下关于控件的叙述中，正确的是 （ A）列表框包含了组合框的全部功能 （
12、B）列表框兼有组合框 和文本框的功能 （ C）列表框和组合框具有完全不同的功能 （ D）组合框兼有列表框和文本框的功能 24 判断单选按钮是否被选中的属性为 （ A） Selected （ B） Checked （ C） Value （ D） Index 25 窗体上有名称为 Commandl的命令按钮，名称分别为 List1、 List2的列表框，其中 List1的 MultiSelect属性设置为 1(Simple)，并有如下事件过程： Private Sub Commandl_Click() For i=0 To List1 ListCount-1 If List1 Selected(i
13、)=True Then List2 Addltem Text End If Next End Sub 上述事件过程的功能是将 List1中被选中的列表项添加到 List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是 （ A）将 For循环的终值改为 List1 ListCount （ B）将 List1 Selected(i)=True改为 List1 List(i) Selected=True （ C）将 List2 Addltem Text改为 List2 Addltem List1 List(i) （ D）将 List2 Addltem Text改为 List2 A
14、ddltem List1 Listlndex 26 窗体上有一个名为 List1的列表框和一个名为 Command1的命令按钮，并有下面的事件过程： Private Sub Command1_Click() n =List1 Listlndex If n0 Then ch$=List1 List(n) List1 List(n)=List1 List(n1)： List1 List(n-1)=ch End If End Sub 程序运行时，选中 1个列表项，然后单击 Command1按钮，则产生的结果是 （ A）若选中的不是最前面的列表项，则选中的列表项与它前一个列表项互换位置 （ B）选中的
15、列表项与它前面的列表项互换位置 （ C）若选中的不是最后面的列表项，则选中的列表项与它后一个列表项互换位置 （ D）选中的列表项与它后面的列表项互换位置 27 窗体上有一个名称为 Combo1的组合框，一个名称为 Command1的命令按钮。要求编写程序，在组合框中输入一个字符串，当单击命令按钮时，将该字符串逐项与组合框中原有列表项进行比较，若有相同列表项，则将其删除；若没有相同列表项，则将其添加到组合框中。现有人编写如下程序，以期实现上述功能： Private Sub Command1_Click() str1=Trim(Combo1 Text)： flag=0 If str1”Then F
16、or i=0 To Combol ListCount1 If str1=Combo1 List(i)Then Combol Removeltem i： Combol TeXt=”： flag=1 End If Next Ifflag=1 Then Combol Addltem Combol Text End If End Sub 程序中存在问题，以下关于程序问题的叙述中，正确的是 （ A） For循环的循环初值 i应该从 1开始 （ B）语句 Combol RemoveItem i有错误 （ C）语句 Combol AddItem Combol Text有错， Combol Text的内容已存
17、在于组合框中 （ D）应把程序倒数第 3行中的 Ifflag=1改为 Ifflag=0 28 在窗体上画一个名称为 List1的列表框，然后编写如下程序： Private Sub Form_Click() For i=1 To 10 Item=”Item”&i： List1 Addltem Item Next i End Sub 程序运行时，单击窗体，所完成的功能是 （ A）向列表框中添加 10个项目 （ B）向列表框中添加 11个项目 （ C）向列表框中添加 10个数字 （ D）向列表框中添加 1 10的和 29 设窗体上有一个名称为 List1的列表框和一个名称为 Check1的复选框数组
18、 (下标从 0开始 )。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。 Private Sub Check1_Click(Index As Integer) For k=0 To Listl ListCount-1 If Checkl(Index) Caption=List1 List(k)Then Exit For Next k If kList1 ListCount Then List1 Removeltem k Else List1 Addltem_ End If End Sub 为使上面 程序可以实现该功
19、能，程序代码中横线上应该填入的代码是 （ A） k （ B） Check1 Caption （ C） Checkl(k) （ D） Checkl(Index) Caption 30 设窗体上有 1个滚动条要求单击滚动条右端的篓按钮一次，滚动块移动一定的刻度值，决定此刻度值的属性是 （ A） Max （ B） Min （ C） SmallChange （ D） LargeChange 31 窗体上有两个水平滚动条 HV、 HT，还有一个文本框 Text1和一个标题为 “计算 ”的命令按钮 Command1，并编写了以下下程序： Private Sub Command1_Click() End S
20、ub Pablic Sub calc(x As Integer ， y As Integer) Text1 Text=x*y End Sub 运行程序，单击 “计算 ”按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是 （ A）过程调用语句不对，应为 calc(HV， HT) （ B）过程定义语句的形式参数不对，应为 Subcalc(x As Control， y As Control) （ C）计算结果在文本框中显示出来 （ D）程序不能正确运行 32 滚动条可以响应的事件是 （ A） Load （ B） Scroll （ C） Click （ D） Mouse
21、Down 33 设窗体上有一个名称为 HSl的水平滚动条，如果执行了语句： HS1 Value=(HS 1 MaxHS1 Min) 2+HS1 Min则： （ A）滚动块处 于最左端 （ B）滚动快处于最右端 （ C）滚动块处于中间位置 （ D）滚动块可能处于任何位置，具体位置取决于 Max、 Min属性的值 国家二级 VB机试（常用标准控件）模拟试卷 28答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 本题考查的考点是组合框的基本属性。 Caption属性设置列表框的标题； List属性是一个数组，存放组合框中所有项目的内容； Text属性可返回列表框中当前选中项目的内容； Se
22、lected属性用于设置或返回指定索引号列表项的选中状态。 【知识模块】 常用标准 控件 2 【正确答案】 C 【试题解析】 列表框的 MultiSelect属性用于设置是否可在列表项中做多个选择。值为 0一 None(缺省设置 )表示不允许做多项选择；值为 1一 Simple表示允许做简单多项选择；值为 2一 Extended表示允许配合使用 Shift键、 Ctrl键做多项选择。 【知识模块】 常用标准控件 3 【正确答案】 B 【试题解析】 列表框的 List属性是一个字符串数组，数组的一项就是一个列表项目，可以通过下标访问数组中的值。 ListCount属性是一个整型值，代表数组 中的
23、项目个数。 Selected属性是一个数组，用于设置或返回指定索引号列表项的选中状态。值为 True表示被选中：值为 False表示未被选中。 ListIndex属性：可返回当前所选项目的索引号，其起始值为 0，最后一项的值为 ListCount1。当ListIndex的值为 -1时，表示未选定项目。 MultiSelect属性用于表示是否能够在控件中进行复选以及如何进行复选。 MultiSelect属性可取 0、 1、 2这 3种值，默认时为 0，表示不允许复选。 【知识模块】 常用标准控件 4 【正确答案】 A 【试题解析】 要求在其编辑区输入文本并按回车键后，编辑区中的文本被添加到列表中
24、，所以代码应该写在组合框的 KeyDown方法中；组合框的编辑区中输入的文本通过组合框的 Text属性返回。 【知识模块】 常用标准控件 5 【正确答案】 A 【试题解析】 单选按钮 (OptionBttton)组常用于提供多个选项间的唯一选择。Vatue属性返回或设置单选按钮的选中状态，其中单选按钮的 Value属性可设置为两种值： False表示未选 (默认值 )；值为 True表示选中，选择某单选按钮后，该单选按钮中将 显示 “”。 【知识模块】 常用标准控件 6 【正确答案】 B 【试题解析】 列表框的 ListIndex属性用于返回或设置控件中当前选择项目的索引 (下标 )，设计时不
25、可用。当 ListIndex的值设置为一 1时，表示未选定项目，第一项的索引值为 0，最后一项的索引值为 ListCount一 1。 【知识模块】 常用标准控件 7 【正确答案】 B 【试题解析】 组合框的 AddItem方法可以将指定的字符串加入到组合框的尾部，本题要求加入的是文本框的值，即文本框的 Text属性值。 【 知识模块】 常用标准控件 8 【正确答案】 B 【试题解析】 列表框的 Clear方法用于清除列表框中的所有项目。 【知识模块】 常用标准控件 9 【正确答案】 B 【试题解析】 列表框的 ListIndex属性用于返回或设置控件中当前选择项目的索引 (下标 )，设计时不可
26、用。当前选定的列表项表示成List1 List(Listl ListIndex)。 【知识模块】 常用标准控件 10 【正确答案】 B 【试题解析】 列表框的 MultiSelect属性用于设置是否可在列表 项中做多个选择。值为 0None(缺省设置 )表示不允许做多项选择；值为 1-Simple表示允许做简单多项选择；值为 2-Extended表示允许配合使用 Shift键、 Ctrl键做多项选择。 【知识模块】 常用标准控件 11 【正确答案】 A 【试题解析】 列表框的 ListIndex属性用于返回或设置控件中当前选择项目的索引 (下标 )，设计时不可用。当 ListIndex的值设置
27、为一 1时，表示未选定项目，第一项的索引值为 0，最后一项的索引值为 ListCount1。 【知识模块】 常用标准控件 12 【正确答案】 D 【试题解析】 标签的 BackStyle属性用于设置是否让标签覆盖背景，可以取 0(标签不覆盖背景，以透明方式显示 )和 1(默认值，标签覆盖背景 )；按钮的 Style属性用来设置命令按钮的外观，可设置成 Standard，按钮以标准的形式显示，即文字形式，为默认值，值为 Graphical，按钮将以图形的方式显示；文本框的ScrollBars属性用于设置文本框是否有水平或垂直滚动条，可设置成 4种值： 0None，表示没有滚动条 (默认值 )；
28、1Horizontal，表示只有水平滚动条； 2一Vertical：表示只有垂直滚动条； 3一 Both：表示有水平和垂直滚动条；复选框的Value属性可设置为以下 3种值：值 0Unchecked表示未选 (默认值 )， “”消失；值 1-Checked表示选中，复选框将显示 “”：值 2一 Graved表示以灰色呈现。 【知识模块】 常用标准控件 13 【正确答案】 B 【试题解析】 列表框和组合框当其项目较多时均会自动出现滚动条以便用户能够查看每项；文本框可以通过设置 ScrollBars属性来设置滚动条，标签没有滚动条。 【知识模块】 常 用标准控件 14 【正确答案】 D 【试题解析
29、】 AddItem方法可以向列表框中添加一个列表项， RemoveItem方法可删除列表框中的一列表项； Clear方法可以删除列表框中的所有列表项。 【知识模块】 常用标准控件 15 【正确答案】 B 【试题解析】 窗体的 Picture属性用于设置窗体的背景图形；复选框的 Style属性为 1时将以图形方式显示，此时可以设置 Picture属性来设置显示的图形；命令按钮的 Picture可以设置图形显示，列表框不具备 Picture属性。 【 知识模块】 常用标准控件 16 【正确答案】 C 【试题解析】 列表框的 List属性是一个字符串数组，数组的一项就是一个列表项目，可以通过下标访问
30、数组中的值 Selected属性是一个数组，用于设置或返回指定索引号列表项的选中状态。值为 True表示被选中：值为 False表示未被选中。 ListIndex属性可返回当前所选项目的索引号，其起始值为 0，最后一项的值为 ListCount一 1。当 ListIndex的值为一 1时，表示未选定项目。 【知识模块】 常用标准控件 17 【正确答案】 D 【试题解析】 输入型控件一般都能响应 Click事件，但本题的选项均不是输入型控件。框架、标签和图片框、图像框虽然不是输入型控件，但是也能响应 Click事件，形状不能响应 Click事件。 【知识模块】 常用标准控件 18 【正确答案】
31、B 【试题解析】 在复选框的鼠标按下事件中，将复选框的 Value属性设置为 1。复选框的 Value属性可设置为以下 3种值：值 0-Unchecked表示未选 (默认值 )， “”消失；值 1Checked表示选中，复选框将显示 “”；值 2一 Grayed表示以灰色呈现。 【知识模块】 常用标准控件 19 【正确答案】 B 【试题解析】 列表框的 List属性是一个字符串数组，数组的一项就是一个列表项目，可以通过下标访问数组中的值。 ListIndex属性可返回当前所选项目的索引号，其起始值为 0，最后一项的值为 ListCount1。所以 A选项为List1 List(List1 Li
32、stCount)赋值，是在最后追加了一项； C选项使用 AddItem方法在最后追加一项； D选项是在 List1 ListCount的位置追加一项，其实也是在最后追加； B选项将会把现有列表 的最后一项值改为 “VB程序 ”。 【知识模块】 常用标准控件 20 【正确答案】 C 【试题解析】 列表框的 List属性是一个字符串数组，数组的一项就是一个列表项目，可以通过下标访问数组中的值。 ListIndex属性可返回当前所选项目的索引号，其起始值为 0，最后一项的值为 ListCount1。当 ListIndex的值为一 1时，表示未选定项目。可用 MultiSelect属性设置是否可多选。
33、 【知识模块】 常用标准控件 21 【正确答案】 C 【试题解析】 复选框的 Value属性 可设置为以下 3种值：值 0Unchecked表示未选 (默认值 )， “”消失；值 1Checked表示选中，复选框将显示 “”；值 2一Graved表示以灰色呈现。 【知识模块】 常用标准控件 22 【正确答案】 C 【试题解析】 标签控件 (Label)常用于显示用户不能直接改变的信息，其 Caption属性用来设置其显示的文本。列表框的 Text属性用于返回列表框中选择的项目的内容，返回值总与列表框的 List(ListIndex)属性的返回值相同，而列表框的ListIndex属性只返回当前选
34、择的项 目的索引号。 【知识模块】 常用标准控件 23 【正确答案】 D 【试题解析】 组合框 (ComboBox)将文本框与列表框的特性组合在一起，既可在组合框的文本框部分输入信息，也可在列表框部分选择项目。 【知识模块】 常用标准控件 24 【正确答案】 C 【试题解析】 Value属性返回或设置单选按钮的选中状态，其中单选按钮的Value属性可设置为两种值： False表示未选 (默认值 )；值为 True表示选中，选择某单选按钮后，该单选按钮中将显示 “”。 【知识模块】 常用标 准控件 25 【正确答案】 C 【试题解析】 列表框的 List属性是一个字符串数组，数组的一项就是一个列
35、表项目，可以通过下标访问数组中的值。本题中试图向 List2中添加 List1中的列表项，所以应该是 List2 AddItem List1.List(i)，列表框的 Text属性可返回列表框中当前选中项目的内容，但不能加入一个没有指明对象的 Text属性。 【知识模块】 常用标准控件 26 【正确答案】 A 【试题解析】 List属性是一个数组，存放列表框中所有项目的内容； ListIndex属性可返回当前所选项目的索引号，第一个项目的索引号为 0。 List1 List(n-1)指的是当前选中列表项的前一个列表项。 【知识模块】 常用标准控件 27 【正确答案】 D 【试题解析】 本题中首
36、先用一个循环遍历组合框的所有列表项，依次取出每一个列表项与 str1进行比较，若相同则删除该项，将 flag置为 1，否则。 flag为 1；循环结束后如果 flag的值为 0则说明没有任何一个现有的列表项与 str1相同，需要将 str1添加到组合框中，否则不需添加。 【知识模块】 常用标准控件 28 【正确答案】 A 【试题解析】 本题中 For循环执行了 10次，调用了 10次 AddItem方法，向列表框中添加了 10个项目。 【知识模块】 常用标准控件 29 【正确答案】 D 【试题解析】 横线处应该填写要添加进列表框的项目内容，本题要求添加复选框的标题，由于复选框是一个控件数组，要
37、想确定某一个具体的复选框需要使用控件数组的下标来访问到控件，然后取出标题属性添加进列表框中。 【知识模块】 常用标准控件 30 【正确答案】 C 【试题解析】 本题考查滚动条属性设置。滚 动条的 Max属性设置最大值， Min属性设置最小值， SmallChange决定在滚动条两端的箭头钮上单击时改变的值，LargeChange决定在滑块上方或下方区域单击时改变的值。 【知识模块】 常用标准控件 31 【正确答案】 C 【试题解析】 本题考查控件属性和过程调用。在 Commandl的 Click事件过程中，调用 calc过程，传入的参数是两个滚动条的 value值。在 calc过程中，把 x和 y的乘积 (距离 )显示在文本框当中。 【知识模块】 常用标准控件 32 【正确答案】 B 【试题解析】 本题考查滚动条事件过程，滚动条可以响应 Scroll事件。 【知识模块】 常用标准控件 33 【正确答案】 C 【试题解析】 本题考查滚动条的使用。根据 HSl Value=(HSl Max-HS1 Min) 2+HS1 Min可知， HS1 Value是在最小值的基础上加上滚动条长度的一半，因此滚动条的滚动块位于中间位置。 【知识模块】 常用标准控件
