一、选择题(1～20每小题2分，21～30每小题3分，共70分)
1.在窗体中添加一个命令按钮，并编写如下程序：
Private Sub Command1Click()
X=1:Y=2:Z=3
X=Y:Y=Z:Z=X
Print Z
End Sub
程序执行后，输出的结果是()（本题分值：1分）
A.3
B.0
C.2
D.1
【正确答案】
C
2.下列叙述不正确的是()（本题分值：1分）
A.注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译
B.注释语句可以放在代码中的任何位置
C.注释语句不能放在续行符的后面
D.代码中加入注释语句的目的是提高程序的可读性
【正确答案】
B
3.Rnd函数不可能产生()值。（本题分值：1分）
A.0
B.1
C.0.1234
D.0.00005
【正确答案】
B
4、下面表达式中，()的运算结果与其他三个不同。（本题分值：1分）
A.Exp(-3.5)
B.Int(-3.5)+0.5
C.-Abs(-3.5)
D.Sgn(-3.5)-2.5
【正确答案】
A
5.数学式子sin30°写成VB表达式是：()（本题分值：1分）
A.Sin30
B.Sin(30)
C.Sin(30°)
D.Sin(30*3.14/180)
【正确答案】
D
6.表达式5＾2 Mod 25＾2的值是()（本题分值：1分）
A.1
B.0
C.6
D.4
【正确答案】
A
7.函数UCase(Mid(″visual basic″,8,8))的值为()（本题分值：1分）
A.visual
B.basic
C.VISUAL
D.BASIC
【正确答案】
D
8.设有数组声明语句：
Option Base 0
Dim B(-1 To 10,2 To 9,20) As Integer
则数组B中共有()个元素。（本题分值：1分）
A.1800
B.1848
C.2016
D.2310
【正确答案】
C
9.在VB语言中，6个关系运算符在运算过程中优先级从高到低的顺序是()（本题分值：1分）
A.=→<>→<→>→<=→>=
B.>→>=→=→<→<=→<>
C.<=→<→=→>=→>→<>
D.不分先后顺序
【正确答案】
D
10.下面程序运行后，输出的值是()
Private Sub Command1_Click()
J=1
While J＜5
J=J+1
A=A+J*J
Wend
Print A
End Sub
（本题分值：1分）
A.25
B.16
C.29
D.54
【正确答案】
D
11.有如下程序：
Private Sub FormKeyPress(KeyAscii As Integer)
For m=1 To 3
For j=1 To m
For k=j To 3
n=n+m+j-k
Next k
Next j
Next m
Print n
End Sub
程序运行后，按任意键，n的值是()（本题分值：1分）
A.3
B.14
C.9
D.20
【正确答案】
D
12.函数InStr(″VB程序设计教程″，″程序″)的值为()（本题分值：1分）
A.1
B.2
C.3
D.4
【正确答案】
C
13.单击命令按钮时，下列程序代码的执行结果为()
（本题分值：1分）
A.该计算机中的CPU有32个寄存器
B.该计算机能够处理的最大数不超过232
C.该计算机每秒钟所能执行的指令条数为32MIPS
D.该计算机中的CPU可以同时处理32位的二进制数
【正确答案】
A
14.表达式Int(4*Rnd+1)*(Int(4*Rnd-1))值的范围是( )（本题分值：1分）
A.［-1，8］
B.［-4，8］
C.［-3，8］
D.［0，8］
【正确答案】
B
15.下列赋值语句中，( )是错误的。（本题分值：1分）
A.x=x+1
B.x=x+y
C.x+y=x
D.x=4＞6
【正确答案】
C
16.在以下四个逻辑表达式中，其逻辑值为“真”的是( )（本题分值：1分）
A.Not(3+5＜4+6)
B.2＞1 And 3＜2
C.1＞2 Or 2＞3
D.Not(1＞2)
【正确答案】
D
17.InputBox函数返回值的类型为()（本题分值：1分）
A.数值
B.字符串
C.变体
D.数值或字符串(视输入的数据而定)
【正确答案】
B
18.表达式″Turbo″+″c″＞″True″+″Basic″的值是()（本题分值：1分）
A.0
B.1
C.-1
D.2
【正确答案】
C
19.表达式1.5+3＞2 Or 7 Mod 3＜4 And Not 1的运算结果是()（本题分值：1分）
A.-1
B.0
C.1
D.其他
【正确答案】
A
20.下列程序的功能是()
（本题分值：2分）
A.输出字符串x的值
B.输出字符串x的长度
C.判断字符串x是否对称
D.输出字符串x左右两边的字符
【正确答案】
C
21.下面程序运行后，窗体(Form1)中输出的结果是( )
Private Sub Form1_Load()
Form1.AutoRedraw=True
x=-17.8
Print Sgn(x)*Int(Abs(x))
End Sub
（本题分值：1分）
A.-18
B.-17
C.17
D.18
【正确答案】
B
22.在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
A=″12″
B=″34″
C=″56″
Print A＋B＋C
End Sub
程序运行后，单击命令按钮，输出结果是( ) （本题分值：1分）
A.″123456″
B.123456
C.102
D.显示出错信息
【正确答案】
B
23.下面程序运行后输出的结果是( ) 
（本题分值：1分）
A.1 1
B.0 2
C.1 2
D.6
【正确答案】
C
24.下面程序的循环次数为( )
For I=10 To 40 Step 6
Print I
Next I
（本题分值：1分）
A.5
B.6
C.32
D.33
【正确答案】
B
25.下面程序运行后，m的值是( )
a=12.3
b=-123
m=Len(Str(a)+Str(b))
（本题分值：1分）
A.9
B.5
C.7
D.8
【正确答案】
A
26.
（本题分值：1分）
A.60
B.43
C.14
D.12
【正确答案】
B
27.
（本题分值：1分）
A.9
B.32
C.6
D.8
【正确答案】
B
28.下面程序运行后输出的结果是( )
Private Sub Form_Click()
For X=5 To 2.5 Step -7
Next X
Print X
End Sub
（本题分值：1分）
A.-2
B.2.5
C.2.9
D.-7
【正确答案】
A
29.下面程序运行后输出的结果是( )
Private Sub Command1_Click()
A=0
For M=1 To 10
A=A+1∶B=0
For J=1 To 10
A=A+1∶B=B+2
Next J∶Next M
Print A;B
End Sub
（本题分值：1分）
A.10 20
B.20 110
C.110 20
D.200 110
【正确答案】
C
30.以下程序段中，循环语句( )
Private Sub Form_Load()
x%=0
While Not x
x=x+1
Print x
Wend
End Sub
（本题分值：1分）
A.是死循环
B.有语法错误
C.循环体执行一次
D.将产生“溢出”错误
【正确答案】
D
二、填空题(每空2分，共30分)
1、要使工具栏控件的某按钮呈按钮菜单的样式，可以在其属性页中设置其选项为5-tbrDropDown。
（本题分值：2分）
【正确答案】
【1】Style
2、若A=20,B=80,C=70,D=30,则表达式A+B＞160 Or (B*C＞200 And Not D＞60)的值是。
（本题分值：2分）
【正确答案】
【2】True
3、2sinx+3cosx+arctanx+ln x lny的VB表达式为。
（本题分值：2分）
【正确答案】
【3】2*Sin(x)+3*Cos(x)+Atn(x)+Log(x)*Log(y)
4、在工具栏的右侧还有两个栏，分别用来显示窗体的当前位置和大小，其单位为，1英寸等于。左边一栏显示的是窗体左上角的坐标，右边一栏显示的是窗体的长×宽。
（本题分值：4分）
【正确答案】
【4】Twip 【5】1440Twip
5、要将某窗体定义为一个MDI子窗体，需要将其属性设置为True。
（本题分值：2分）
【正确答案】
【6】MDIChild
6、下面是用一个子程序求2!+3!+4!的值的程序，请完成程序。
Private Sub Command1_Click()
s=0
For t=
GoSub 200
s=s+p
Next t
Print ″2!+3!+4!=″;s
Exit Sub
200：p=1
For k=1 To t
p=p*k
Next k
End Sub
（本题分值：4分）
【正确答案】
【7】2 To 4
【8】Return
7、使用Mod运算符判断变量i是否为偶数，若为偶数就把它在窗体上显示出来。使用单行结构条件语句为。
（本题分值：2分）
【正确答案】
【9】If i Mod 2=0 Then Print i
8、在运行时，MDI父窗体中的子窗体最小化时，其图标将显示在中。
（本题分值：2分）
【正确答案】
【10】MDI父窗体
9、搬砖问题：36块砖，36人搬，男的搬4块，女的搬3块，2个小儿抬1块，要求1次全部搬完，问需男、女、小儿各多少人?
Private Sub Command1_Click()
For Male=1 To 9
For Female=1 To 12
For Boy=1 To 36 Step 2
If Boy+Female+Male=36 And Then
Print Male,Female,Boy
End If
Next Boy
Next Female
Next Male
End Sub
（本题分值：2分）
【正确答案】
【11】Male*4+Female*3+Boy/2=36
10、下面的程序用于根据文本框X中输入的内容进行以下处理：
若X为2、4、6，则打印“X的值为2、4、6”；若X为3、5，则打印“X的值为3、5”；若X为7、8，则打印“X的值为7、8”；否则，打印“X不在范围内”。
Private Sub Command1_Click()
Select Case Val(X.Text)
Case
Print ″X的值为2、4、6″
Case
Print ″X的值为3、5″
Case
Print ″X的值为7、8″
Print ″X不在范围内″
End Select
End Sub
（本题分值：8分）
【正确答案】
【12】2，4，6
【13】3，5
【14】7，8
【15】Case Else
·2009年9月计算机等考二级VB模拟题及解析(13) (2009-9-18 11:13:52)
·2009年9月计算机等级考试二级C语言模拟试题(13) (2009-9-18 10:49:55)
·2009年9月计算机等级考试二级C++模拟试题(4) (2009-9-17 11:45:15)
·2009年9月计算机等考二级VB模拟题及解析(12) (2009-9-17 11:28:27)
·2009年9月计算机等级考试二级C语言模拟试题(12) (2009-9-17 11:01:48)
网友评论
，我们将会及时处理。如转载本
