计算机二级(VB)37
(总分100,考试时间120分钟)
选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 根据变量的作用域，可以将变量分为3类，分别为（ ）。
A. 2 B. -2
C. 0 D. +2
2. 下列程序段的执行结果为( )。 a=75 If a ＞ 60 Then Score=1 If a ＞ 70 Then Score=2 If a ＞ 80 Then Score=3 If a ＞ 90 Then Score=4 Print "Score= "；Score
A. 对顺序文件中的数据操作只能按一定的顺序操作
B. 顺序文件结构简单
C. 顺序文件的数据以字符(ASCII码)形式存储
D. 能同时对顺序文件进行读写操作
3. 下面4个CT函数中是用来判断用户输入的数是否为奇数的，是奇数的返回1，否则返回0，其中正确的是（ ）。
A. Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 0 ElSe Return 1 End if End Function
B. Function CT(ByVal a As Integer) If a Mod 2=0 Then CT=0 Else CT=1 End if End Function
C. Function CT(ByVal a As Integer) If a Mod 2=0 Then CT=1 Else CT=0 End if End Function
D. Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 1 Else Return 0 End if End Function
4. 语句A=B+C代表的意思是（ ）。
A. ④ B. ⑤
C. ⑥ D. ⑦
5. 在窗体上有一个命令按钮，然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox("enter the first integer") b=InputBox("enter the second integer") Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为( )。
A. ifstream fin；fin．open("C：\\test．txt")；
B. ifstream fin("C：\\test．txt")；
C. A)和B)
D. ifstream fin；fin("C：\\test．txt")；
6. 以下叙述中错误的是（ ）。
A. 下拉式菜单和弹出式菜单都用菜单编辑器建立
B. 在多窗体程序中，每个窗体都可以建立自己的菜单系统
C. 除分隔线外，所有菜单项都能接收Click事件
D. 如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见
7. 在用菜单编辑器设计菜单时，不可缺少的项目是（ ）。
A. 快捷键 B. 名称
C. 索引 D. 标题
8. 要获得当前驱动器应使用驱动器列表框的属性是（ ）。
A. Path B. Drive
C. Dir D. Pattern
9. 有如下事件过程： Function UNC (ByVal x As Integer，ByVal y As Integer) As Integer Do While y＜＞0 sic=x/y x=y y=sic Loop UNC=x End Function 以下是该函
数的调用过程，该程序的运行结果是( )。 PriVate Sub COmmand1_Click() Dim a As Integer Dim b As Integer a=12 b=2 x=UNC (a，b) Print x End Sub
A. 0 B. 6
C. 2 D. 80
10. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是（ ）。
A. 4 B. 5
C. 6 D. 7
11. 表达式(7\2+1)*(8\2+2)的值为（ ）。
A. 4.58 B. 5.69
C. 24 D. 22
12. 在窗体上画 1 个命令按钮，其名称为 Command1，然后编写如下程序：Private Sub Command1_Click() Dim a(10) As IntegerDim x As IntegerFor i=1 To 10a(i)=8+i Next x=2Print a(f(x)+x) End SubFunction f(x As Integer)x=x+3f=xEnd Function程序运行后，单击命令按钮，输出结果为______。
A. 12 B. 15
C. 17 D. 18
13. 下列说法错误的是（ ）。
A. Caption为只读属性，运行时对象的名称不能改变
B. 设置Height或Width的数值单位为twip，是1点的1/20
C. Icon属性用来设置窗体最小化时的图标
D. 用来激活属性窗口的快捷键是F4键
14. 任何控件都有的属性是（ ）。
A. BackColor B. Caption
C. Name D. BorderStyle
15. 下列语句的输出结果为（ ）。 Print Format$(5689．36，"000，000．000")
A. 在窗口的垂直滚动条的上面，有一个“拆分栏”，利用它可以把窗口分为两个都分，每个窗口显示代码的一部分
B. 双击控件设计窗体即可打开程序代码窗口
C. 在程序代码的左下角有两个按钮，可以选择全模块壹看或者是过程查看
D. 默认情况下，窗体的事件是Load
16. 下列程和序段的执行结果为（ ）。 x=Int(Rnd()+9) Select Case X Case 10 Print "excellent" Case 9 Print "good" Case 8 Print "pass" Case Else Print "fail" End Select
A. excellent B. good
C. pass D. fail
17. 下列程序段的执行结果为（ ）。 I=9 X=5 Do I=I+1 x=x+2 Loop Until I ＞=7 Print"I="；I Print"x="；x
A. I=4x=5 B. I=7x=15
C. I=6x=8 D. I=10x=7
18. 单击命令按钮时，下列程序的执行结果为（ ）。 Private Sub Command1_Click() Dim x As Integer，y As Integer x=12：y=32 Call Proc(x，y) Print x；y End Sub Public Sub Proc(n As Integer，ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
A. 12 32 B. 2 32
C. 2 3 D. 12 3
19. 计算z的值，当x大于y时，z=x；否则z=y。下列语句错误的是（ ）。
A. ALL，REST，NEXT和RECORD
B. NEXT，REST，FIELDS和TOP
C. REST，FIELDS，FOR和BOTYOM
D. ALL，FOR，WHILE和RECORD
20. 设有数组定义语句：Dim a(5)As Integer，List1为列表框控件。下列给数组元素赋值的语句错误的是（ ）。
A. 打开过程文件时，其中的主过程自动调入内存
B. 同一时刻只能打开一个过程，打开新的过程后，旧的过程自动关闭
C. 用命令DOWITH调用过程时，过程文件无需打开就可调用其中的过程
D. 用命令DOWITHIN调用过程时，过程文件无需打开，就可调用其中的过程
21. 下列操作可以打开立即窗口的是（ ）。
A. Ctrl + D B. Ctrl + F
C. Ctrl + G D. Ctrl + E
22. 下列说法正确的是（ ）。
A. 在Visual Basic 中的对话框分为两种类型：预定义对话框和自定义对话框
B. 自定义对话框由用户根据自己需要定义的
C. 预定义对话框是用户在设置程序代码后定义的
D. MssgBox 函数是用户的自定义对话框的函数
23. 以下叙述中错误的是（ ）。
A. 在KeyPress事件过程中不能识别键盘的按下与释放
二级VBB. 在KeyPress事件过程中不能识别回车键
C. 在KeyDown和KeyUp事件过程中，将键盘输入的“A”和“a”视作相同的字母
D. 在KeyDown和KeyUp事件过程中，从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符
24. 根据变量的作用域，可以将变量分为3类，分别为（ ）。
A. 局部变量、模块变量和全局变量 B. 局部变量、模块变量和标准变量
C. 局部变量、模块变量和窗体变量 D. 局部变量、标准变量和全局变量
25. Sub过程与Function过程最根本的区别是（ ）。
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论