2009年9月全国计算机等级考试二级笔试试卷
Visual Basic语言程序设计
（考试时间90分钟，满分100分）
一、选择题（每小题2分，共70分）
（1）下列数据结构中，属于非线性结构的是（）。
A）循环队列B）带链队列
C）二叉树D）带链栈
（2）下列数据结构中，能够按照“先进后出”原则存取数据的是（）。
A）循环队列B）栈
C）队列D）二叉树
（3）对于循环队列，下列叙述中正确的是（）。
A）队头指针是固定不变的
B）队头指针一定大于队尾指针
C）队头指针一定小于队尾指针
D）队头指针可以大于队尾指针，也可以小于队尾指针
无花果种植（4）算法的空间复杂度是指（）。
A）算法在执行过程中所需要的计算机存储空间
B）算法所处理的数据量
C）算法程序中的语句或指令条数
D）算法在执行过程中所需要的临时工作单元数
（5）软件设计中划分模块的一个准则是（）。
达成铁路A）低内聚低耦合B）高内聚低耦合
C）低内聚高耦合D）高内聚高耦合
（6）下列选项中不属于结构化程序设计原则的是（）。
A）可封装B）自顶向下
C）模块化D）逐步求精
（7）软件详细设计产生的图如下：
该图是（）。
A）N-S图B）PAD图C）程序流程图D）E-R图（8）数据库管理系统是（）。
A）操作系统的一部分B）在操作系统支持下的系统软件C）一种编译系统D）一种操作系统
（9）在E-R图中，用来表示实体联系的图形是（）。
A）椭圆形B）矩形C）菱形D）三角形（10）有三个关系R，S和T如下：
R S T
A B C A B C A B C
a 1 2 d 3 2 a 1 2
b 2 1 b 2 1
c 3 1 c 3 1
制作卡片d 3 2
其中关系T由关系R和S通过某种操作得到，该操作为（）。
A）选择B）投影C）交D）并
（11）以下变量名中合法的是（）。
A）x2-1 B）print C）str_n D）2x
（12）把数学表达式53
26
x
y
+
−
表示为正确的VB表达式应该是（）。
A）(5x+3)/(2y-6) B）x*5+3/2*y-6
C）(5*x+3)÷(2*y-6) D）(x*5+3)/(y*2-6)
（13）下面有关标准模块的叙述中，错误的是（）。
A）标准模块不完全由代码组成，还可以有窗体
B）标准模块中的Private过程不能被工程中的其他模块调用
C）标准模块的文件扩展名为.bas
D）标准模块中的全局变量可以被工程中的任何模块引用
（14）下面控件中，没有Caption属性的是（）。
A）复选框B）单选按钮C）组合框D）框架（15）用来设置文字字体是否斜体的属性是（）。
A）FontUnderline B）FontBold C）FontSlope D）Fontltalic （16）若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（）。
Private Sub Click_MouseDown(Button As Integer,_
Shift As Integer, X As Single, Y As Single)
Print "VB Program"
End Sub
A）用鼠标左键单击名称为“Commandl”的命令按钮时，执行此过程
B）用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C）用鼠标右键单击名称为“MouseDown”的控件时，执行此过程
D）用鼠标左键或右键单击名称为“Click”的控件时，执行此过程
（17）可以产生30~50(含30和50)之间的随机整数的表达式是（）。
A）Int(Rnd*21+30) B）Int(Rnd*20+30)
C）Int(Rnd*50-Rnd*30) D）Int(Rnd*30+50)
（18）在程序运行时，下面的叙述中正确的是（）。
A）用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_Load事件过程B）用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程
C）只装入而不显示窗体，也会执行窗体的Form_Load事件过程
D）装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程（19）窗体上有名称为Commandl的命令按钮和名称为Textl的文本框（）。
Private Sub Commandl_Click()
Textl.Text="程序设计"
Textl.SetFocus
End Sub
Private Sub Textl_GotFocus()
Textl.Text="等级考试"
End Sub
运行以上程序，单击命令按钮后（）。
A）文本框中显示的是“程序设计”，且焦点在文本框中
B）文本框中显示的是“等级考试”，且焦点在文本框中
C）文本框中显示的是“程序设计”，且焦点在命令按钮上
D）文本框中显示的是“等级考试”，且焦点在命令按钮上
（20）设窗体上有名称为Optionl的单选按钮，且程序中有语句：
If Option1.Value=True Then
下面语句中与该语句不等价的是（）。
A）If Optionl.Value Then B）If Optionl=True Then
C）If Value=True Then D）If Optionl Then
（21）设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。
下面叙述中正确的是（）。
A）程序运行时，若使滚动块向左移动，滚动条的Value属性值就增加
B）程序运行时，若使滚动块向左移动，滚动条的Value属性值就减少
C）由于滚动条的Max属性值小于Min属性值，程序会出错
D）由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动
（22）有如下过程代码：
Sub var_dim()
Static numa As Integer
Dim numb As Integer
numa=numa+2
numb=numb+1
print numa; mumb
End Sub
连续3次调用var dim过程，第3次调用时的输出是（）。
A）2 1 B）2 3 C）6 l D）6 3
（23）在窗体上画1个命令按钮，并编写如下事件过程：
Private Sub Commandl_Click()
For i=5 To 1 Step -0.8
Print Int(i);
Next i
End Sub
运行程序，单击命令按钮，窗体上显示的内容为（）。
A）5 4 3 2 1 1 B）5 4 3 2 1
C）4 3 2 1 1 D）4 4 3 2 1 1
（24）在窗体上画1个命令按钮，并编写如下事件过程：
Private Sub Commandl Click()
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-m Then
a(m,n)=m+n
Else
a(m,n)=0
End If
中国Print a(m,n);
Next n
Print
Next m
End Sub
运行程序，单击命令按钮，窗体上显示的内容为（）。
A）2 0 0 B）2 0 4 C）2 3 0 D）2 0 0
0 4 0 0 4 0 3 4 0 0 4 5
0 0 6 4 0 6 0 0 6 0 5 6
（25）设有以下函数过程：
Function fun(a As Integer,b As Integer)
Dim c AS Integer
If a<b Then
c=a: a=b: b=c
End If
c=0
DO
c=c+a
Loop Until C Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数，则函数返回的是（）。
A）a、b的最大公约数B）a、b的最小公倍数
C）a除以b的余数D）a除以b的商的整数部分
（26）窗体上有1个名称为Textl的文本框；1个名称为Thnerl的计时器控件，其Lnterval属性值为5000，Enabled属性值是True。Timerl的事件过程如下：
Private Sub Timerl_Timer()
Static flag As Integer
If flag=0 Then flag=1
flag=-flag
If flag=1 Then
Text1.ForeColor=&HFF& '&HFF&为红
Else
Text1.ForeColor=&HC000$ '&HC000&为绿
End If
End Sub
以下叙述中正确的是（）。
A）每次执行此事件过程时，flag的初始值均为0
B）flag的值只可能取0或1
北京2022年高考时间确定C）程序执行后，文本框中的文字每5秒改变一次颜
D）程序有逻辑错误，Else分支总也不能被执行
（27）为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Textl中，若编写如下事件过程：Private Sub Commandl Click()
Dim a%，S%，k%
s=1
a=2
For k=2 To 10
a=a*2
s=s+a
Next k
Textl.Text=s
End Sub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（）。
A）把s=1改为s=0 B）把For k=2 To 10改为For k=I To 10
C）交换语句s=s+a和a=a*2的顺序D）同时进行B）、C）两种修改
（28）标准模块中有如下程序代码：
Public x As Integer，Y As Integer
Sub var_pub()
x=10 : y=20
End Sub
在窗体上有1个命令按钮，并有如下事件过程：
Private Sub Commandl_Click()
Dim x As Integer
Call var_pub
x=x+100
y=y+100
Print x; y
End Sub
运行程序后单击命令按钮，窗体上显示的是（）。
A）100 100 B）100 120 C）110 100 D）110 120
（29）设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：
祝学生的新年祝福语Function fun(a As Integer,b As Integer)
While a>b
a=a-b
Wend
fun=a
End Function
在调试时发现函数是错误的。为使函数能产生正确的返回值。应做的修改是（）。
A）把a=a-b改为a=b-a B）把a=a-b改为a=a\b
C）把While a>b改为While a<b D）把While a>b改为While a>=b
（30）下列关于通用对话框CommonDialogl的叙述中，错误的是（）。
A）只要在“打开”对话框中选择了文件，并单击“打开”按钮，就可以将选中的文件打开
B）使用CommonDialogl.ShowColor方法，可以显示“颜”对话框
C）CancelError属性用于控制用户单击“取消”按钮关闭对话框时，是否显示出错警告
D）在显示“字体”对话框前，必须先设置CommonDialogl的Flags属性，否则会出错
（31）在利用菜单编辑器设计菜单时，为了把组合键“Alt+X”设置为“退出(x)”菜单项的访问键，可以将该菜单项的标题设置为（）。
A）退出(X&) B）退出(&X) C）退出(X#) D）退出(#X)
（32）在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序：Dim ss As String
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论