国家二级VB机试（数据类型及运算）模拟试卷29
选择题
1.假定一个工程由一个窗体文件Forml和两个标准模块文件Modell和Model2组成Modell的代码如下：
Public x As Integer：Public Y As Integer
Sub S10
x=1
S2
End Sub
Model2的代码如下：
Sub Main()
S1
End Sub
Sub S2()
y=10
Forml．show
End Sub
其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是(C)
A. Forml→Modell→Model2
B. Modell→Model2→Forml
C. Model2→Modell→Forml
D. Model2→Forml→Modell
解析：本题考查启动顺序。本题中，设置Main为启动过程，而Main位于Model2当中，因此最先运行的是Model2中的Mian过程；在Mian过程中调用S1过程，而S1位于Modell模块中，因此接下来运行的是Modell模块；在S1过程中会调用S2过程；S2过程中设置Foml．show来启动Froml，因此最后运行的是Foml。
2.在窗体(名称为Forml)上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写一个事件过程。程序运行后，如果在文本本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的时间过程是(A)
A. Private Sub Textl_Change()
Commandl．Caption=”计算机等级考试”
End Sub
B. Private Sub Textl_Change()
Caption=”计算机等级考试”
End Sub
C. Private Sub Textl_Change()
Textl．Caption=”计算机等级考试”
End Sub
D. Private Sub Textl_Change()
Textl．Text=”计算机等级考试”
End Sub
解析：本题考查控件属性和事件代码。题目要求在文本框输入字符的时候设置命令按钮的标题属性，因此需要在文本框的Change事件代码设置命令按钮的Caption属性。
3.在窗体上画一个列表框和一个命令按钮，其名称分别为listl和Commandl，然后编写如下事件过程：
Private Sub Form_load()
Listl．Addltem”Iteml”：Listl．Addltem”Item2”：Listl．Addltem”Item3”
End Sub
Private Sub Commandl_Click()
List1．List(List1．ListCount)=”AAAA”
End Sub
程序运行后，单击命令按钮，其结果为(B)
A. 把字符串“AAAA”添加到列表框中，但位置不能确定
B. 把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)
C. 把列表框原有的最后一项改为“AAAA”
D. 把字符串“AAAA”插入到列表框的最前面(即“Iteml”的前面)
解析：本题考查控件的属性和方法。在窗体的Load事件代码里面，使用列表框的AddItem方法为Listl列表框增加三项；在命令按钮的Click事件代码里面，此时列表框Listl的ListCount属性为3，因此List1．List(Listl．ListCount)=”AAAA”实际是Listl．Listf31=”AAAA”，即向列表框的最后添加一项。
4.在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click
For i=1 To 5
a(i)=Chr(Asc(”A”)+(i一1))
Next i
For Each b In a
Print b；
Next
End Sub
程序运行后，单击命令按钮，输出结果是(A)
A. ABCDE
B. 1 2 3 4 5
C. abcde
D. 出错信息
解析：本题考查常用函数和For循环。在第一个循环里面，给数组a的元素赋值，第一个元素的值为“A”，第二个元素值为“B”，以此类推；接下来第二个For循环打印输出数组a里面的元素值。
5.设窗体上有一个名为Textl的文本框，并编写如下程序：
Private Sub Form_load()
Show
Textl．Text=\\(C)
A. Visual Basic
B. 程序设计
C. Visual Basic程序设计
D. a程序设计
解析：本题考查控件属性和事件响应。在文本框输入字母“a”会触发文本框的KevDown事件，在该事件代码里面输出“Visual Basic”字符串；接下来单击窗体，会触发窗体的MouseUp事件，在该事件代码里面输出“程序设计”。
6.假定有下表所列的菜单结构：
(C)
A. Private Sub bigicon_Click()
bigicon．Checked=False
End Sub
B. Private Sub bigicon_Click()
Me．appear．bigicon．Checked=True
End Sub
C. Private Sub bigicon_Click()
bigicon．Checked=True
End Sub
D. Private Sub bigicon_Click()
appear．bigicon．Checked=True
End Sub
解析：本题考查菜单的基本知识。在菜单前添加一个“√”这是设置菜单的Checked属性。
7.以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是(B)
A. Left
B. Mid
C. String
D. Instr
解析：本题考查常用函数。常用的字符串截取方式是Mid、LeR和Right，Mid(a，M，N)功能是从a字符串左起第M位下标开始取值(包含M位)，共取N位字符；Right(a，M)表示从右起第一位开始取值，向左取M位；Left(a，N)表示从a字符串左起第一位开始取值，向右取N位。
8.在菜单编辑器中建立1个名称为Menu()的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程
Pr
本文档预览：3600字符，共14566字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
