计算机二级(VB)48
(总分100,考试时间120分钟)
选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 单击命令按钮时，下列程序的执行结果为（ ）。 Private Sub Command1_Click() Dim x As Integer，y As Integer x=50：y=78 Call PPP(x，y) Print x；y End Sub Public Sub PPP(ByVal n As Integer，ByValm As Integer) n=n\10 m=m\10 End Sub
A. 多态 B. 继承
C. 封装 D. 垃圾回收
2. 设在名称为My form的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是【 】
A. 窗体的Click事件过程的过程名是My form Click
B. 命令按钮的Click事件过程的过程名是C1-Click
C. 命令按钮的Click事件过程的过程名是Command1_Click
D. 上述3种过程名称都是错误的
3. 用InputBox函数设计的对话框，其功能是（ ）。
A. 只能接收用户输入的数据，但不会返回任何信息
B. 能接收用户输入的数据，并能返回用户输入的信息
C. 既能用于接收用户输入的信息，又能用于输出信息
D. 专门用于输出信息
4. 有如下程序： Private Sub Commandl_Click() Dim a As Single Dim b As Single a=2：b=4 Call CS(a，b) End Sub Sub CS(x As Single，y As Single) t=X x=t\y y=t Mod y End Sub 程序运行后，单击命令按钮，a和b的值分别为( )。
A. Dim pict[3,4]As Integer
B. Dim pict(3，4)As Integer
C. Dim pict[3．4]As Integer
D. Dim pict(3：4)As Integer．
5. 单击命令按钮时，下列程序的执行结果是( )。 Private Sub Command1_Click() Dim a As Integer，b As Integer，C As Integer a=3 b=4 c=5 Print SecProc(c，b，a) End Sub Function FirProc (x As Integer，y As Integer，z As Integer) FirProc=2 * x + y + 3 * z+2 End Function Function SecProc (x As Integer，y As hteger，z As Integer) SecProc=FirProc(z，x，y)+x+7 End Function
A. 13 B. 16
C. 36 D. 33
6. 一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是（ ）。
A. 变量X、Y的作用域相同 B. Y的作用域是Model1
C. 在Form1中可以直接使用X D. 在Form2中可以直接使用X和Y
7. 下列程序段，在运行时最后输出的内容是（ ）。 a=2 c=1 AAA: c=c + a If c＜10 Then Print c GoTo AAA Else Print "10以内的奇数显示完毕" End If
A. 3 B. 7
C. 9 D. 10以内的奇数显示完毕
8. 下面关于菜单的叙述中错误的是【 】
A. 各级菜单中的所有菜单项的名称必须唯一
B. 同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同
C. 弹出式菜单用Popup Menu方法弹出
D. 弹出式菜单也用菜单编辑器编辑
9. 当滚动条位于最左端或最上端时，Value属性被设置为（ ）。
A. 打印在每页的底部，用来显示本页的汇总说明的是页面页脚
B. 用来显示整份报表的汇总说明，在所有记录都被处理后，只打印在报表的结束处的是报表页脚
C. 报表显示数据的主要区域叫主体
计算机二级vbD. 用来显示报表中的字段名称或对记录的分组名称的是报表页眉
10. 下列叙述中正确的是【 】
A. 一个算法的空间复杂度大,则其时间复杂度也必定大
B. 一个算法的空间复杂度大,则其时间复杂度必定小
C. 一个算法的时间复杂度大,则其空间复杂度必定小
D. 上述三种说法都不对
11. 下列语句的输出结果为( )。 Print Format ＄(10009．36，“000，000．000”)
A. 10，009．36 B. 10，009．360
C. 10，009．3 D. 010，009．360
12. 有如下事件过程，单击命令按钮扣，输出结果是( )。 Private Sub Command1 Click( ) Dim b% (1 To4) ,j%, t# For j=1 To 4 b(j) =j Next j t=Tax(b( ) ) Print "t="; t, End Sub Function Tax (a( ) As Integer) Dim t#, i% t=1 For i=2 To UBound (a) t=t * a(i) Next i Tax=t End Function
A. 私有成员 B. 保护成员
C. 公有成员 D. 所有成员
13. 如下事件过程： Function Feed(x) If x ＜10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box(" "，0)) pay=Feed(x) Print pay End Sub 运行时在输入框内输入变量x的值为15，输出结果为( )。
A. 0 B. 15
C. 25 D. 30
14. Visual Basic中的数值可以用十六进制或八进制表示，十六进制数的开头符是&H，八进制数的开头符号是（ ）。
A. $O B. &O
C. $E D. &E
15. 以下属于Visual Basic合法的数组元素是（ ）。
A. J2DE B. J2SE
C. J2ME D. J2EE
16. 在窗体上画 1 个命令按钮，名称为 Command1，然后编写如下程序：Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("请输入：
")If Flag ThenPrint f(intNum) End IfEnd SubFunction f(X as Integer)As IntegerIf X<10 ThenY=X ElseY=X+10End If f=YEnd FunctionPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single) Flag=TrueEnd Sub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输 出结果为______。
A. 0 B. 5
C. 15 D. 无任何输出
17. 有如下事件过程，当同时按下转换键Shift和功能键F5时其最后输出的信息是（ ）。 Const ShiftKey=1 Const CtrlKey=2 Const Key_F5=&H74 Const Key_F6=&H75 Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) If KeyCode=Key_F5 And Shift=ShiftKey Then Print"Press Shift+F5" ElseIf KeyCode=Key_F6 And Shift=CtrlKey Then Print"Press Ctrl+F6" End If End Sub
A. 无任何信息 B. Press Shift+F5
C. Press Ctrl+F6 D. 程序出错
18. 图片框与图像框的区别是图片框可以作为其他控件的父对象，即为容器控件，而图像框只能 （ ）。
A. excellent B. good
C. pass D. fail
19. Visual Basic程序设计采用的编程机制是（ ）。
A. 可视化 B. 面向对象
C. 事件驱动 D. 过程结构化
20. 用什么语句可以选择指定的表项或取消已选择的表项?
A. @January 10，1979@
B. #January 10，1997#
C. "January 10，1997"
D. &January 10，1997&
21. 若设置了文本框的属性Password Char=“$”,则运行程序时向文本框中输入8个任意字符后,文本框中显不的是【 】
A. 8个“$” B. 1个"$"
C. 8个“$” D. 无任何内容
22. 有关菜单的说法不恰当的是（ ）。
发布评论