Visual Basic 程序设计期终试卷.doc

《Visual Basic 程序设计》模拟试卷二 考试形式：闭卷 考试时间：120分钟 站点：_________ 姓名： 学号： 成绩： 一、选择题（ 8小题，共24分） 1、英文缩写“OOP”的含义是 。 A）事件驱动的编程机制 B）结构化程序设计语言 C）面向对象的程序设计 D）可视化程序设计 2、下面变量名不合法的是 。 A）abc B）abc# C） a$b D）student_num 3、数组定义中 Dim A%（-10 To 20）， 数组变量A% 共有______ 元素。 A) 20 B)30 C) 31 D) 10 4、定义10个单精度实数一维数组正确的语句是 。 A）Dim Abc（9） As Single B）Option Base 1 ：Dim Abc（9） C）Dim Abc#（9） D）Dim Abc（10） As Single 5、语句 Dim s（3，4） As double 表示s是一个二维双精度数组，有_______元素。 A）20 B）12 C）16 D） 15 6、只能用来显示字符信息的控件是 。 A) 图像框 B) 图片框 C) 标签框 D) 文本框 7、菜单项能触发的事件有 。 A）MouseDown B）MouseUp，Click C）Click D）DblClick 和Click 8、方法 Print “10+6=”；10+6 输出的结果是 。 A） 10+6= 10+6 B）10+6=16 C）16=10+6 D）“10+6=”10+6 二、阅读程序写出结果（6小题，每题6分，共36分） 1、下列程序： Private Sub Command1_Click ( ) x1 = InputBox (“请输入数据：”) x2 = InputBox (“请输入数据：”) Print x1 + x2 End Sub 若输入数据 3 和4， 输出结果是 。 2、下列程序： Private Sub Command1_Click ( ) a=0 For J=1 To 15 a = a + J mod 3 Next J Print a End Sub 运行后输出的结果 。 3、下列程序： Private Sub Command1_Click( ) Score = Int ( Rnd * 10) + 80 Select Case score Case Is 60 A$ =”E” Case 60 To 69 A$ = ”D” Case 70 To 79 A$ =” C” Case 80 To 89 A$= “B” Case Else A$ = “A” End Select Print A$ End Sub 运行时输出结果是 。 A）A B）B C）C D）D 4、下列程序： Option Base 1 Private Sub Command1_Click( ) Dim arr(5) As String For j =1 To 5 arr ( j ) = Chr( Asc(“A”) + ( j -1) ) Next j For Each b1 In arr Print b1 ; Next End Sub 运行时输出结果是 。 A) ABCDE B) abcde C) 1 2 3 4 5 D) 程序出错 5、下列程序： Option Explicit Private Sub triangle (str