一、选择题(每题1分，共30分)
1、能被对象所识别的动作与对象可执行的活动分别称为对象的 b 。 A)方法、事件 C)事件、属性
B)事件、方法 D)过程、方法
2、执行语句Print Val(\的值为 b 。 A)12A C)1212
B)12 D)12A1
3、下列 是合法的VB变量名。 A)_ab
B)W_cde D)Name&City
C)5student
4、表达式 * 5 Mod 28 \\ 8的值是 C 。； 3
A)0
B)1
C)2
D)3
5、如果在立即窗口中依次执行下列命令： a=8： b=9 Print a>b
则输出的结果是 C 。 A)1
B)0
C)False
D)True
6、下列表达式的值为真的是 D 。 A)\ C)12>
B)\
D)\
7、表示“X>Y>Z”，正确的VB逻辑表达式是 A 。 A)X>Y And Y>Z C)X>Y OR Y>Z
B)X>Y>Z
D)X>Y And >Z
8、函数CInt、Int、Fix都返回整数值，以下能正确地描述它们返回值的大小关系的是 A 。
A)CInt ＝ Int < Fix B)Int < CInt 9、与语句Dim abc%作用相同的语句是 B 。 A)Dim abc As Long B)Dim abc As Integer D)Dim abc As Date C)Dim abc As String 10、可以查找字符串中给定字符串位置的函数是 D 。 A)Ucase B)Len C)Mid D)Instr。 11、数学表达式?b?b2?4ac2aA)-b + Sqr(b * 对应的正确Visual Basic表达式为 C 。 b - 4 * a * c)/ 2 * a B)-b + Sqr(b * b - 4 * a * c)/ (2 * a) C)(-b + Sqr(b * b - 4 * a * c)) / (2 * a) D)(-b + Sqr(b * b - 4 * a * c)) / 2 * a 12、窗体文件的扩展名是 A 。 A).frm B).vbp C).bas D).frx 13、Visual Basic程序中的注释所使用的字符是 A 。 A)′ B): C)\\ D)_ 14、要使一个文本框对象能够显示多行文字，应该将对象设置为 True的属性值是 B 。 A)Text C)Style B)MultiLine D)Visible 15、执行下面语句后，Len函数值最大的是 C 。 Dim IA As Integer, B As Single, S As String *5, Ch As String IA=32767 : B= : S=\:Ch=\A)Len(IA) B)Len(B) C)Len(S) D)Len(Ch) 16、若要求从文本框中输入密码时在文本框中只显示 * 号，则应当在此文本框的属性窗口中设置 。 A)Text 属性值为 * B)Caption 属性值为 * D)Passwordchar 属性值为 * C)password 属性值为空 17、窗体上放置了三个文本框，若在Text1中输入456，在Text2中输入78，在程序中执行了语句Text3 = Text1 + Text2后，则在Text3中显示 。 A)434 B)45678 C)溢出 D)语法错误 18、下列选项中， 是十六进制数。 A)1234 B)&1234 C)&O1234 D)&H1234 19、执行语句Print Int(4*Rnd+1)后，不能可能出现的值为 。 A)2 B)3 C)4 D)5 20、语句段 a=3: b=5 t=a: a=b: b=t 执行后， 。 A)a值为3，b值为3 C)a值为5，b值为3 B)a值为3，b值为5 D)a值为5，b值为5 21、Print方法可在 上输出数据。 ①窗体 ②文本框 ③图片框 ④标签 ⑤列表框 ⑥立即窗口 A)①③⑥ B)②③⑤ C)①②⑤ D)③④⑥ 22、在运行程序时，将焦点移至指定的控件或窗体，则需使用的方法是 。 A)Change B)SetFocus C)GetFocus D)Move 23、在Visual Basic中最基本的对象是 ，它是应用程序的基石。 A)标签 B)窗体 C)文本框 D)命令按钮 24、下列语句中的 语句可以用来正确地声明一个动态数组。 A)Private A(n) As Integer C)Dim A(,) As Integer B)Dim A() As Integer D)Dim A(1 to n) 25、有程序代码：=\，其中的Text1、Text和\分别代表 。 A)对象、值、属性 C)对象、属性、值 B)对象、方法、属性 D)属性、对象、值 26、在程序中可以通过复选框和单选框的 属性来判断它们的当前状态。 A)Caption B)Value C)Checked D)Selected 27、用窗体的 属性来设置窗体的标题。 A)Style B)Text C)Caption D)Name 28、如果在两个菜单命令项之间加一条分隔线，可在标题文本框中键入 。 A)－ B)＋ C)& D)# 29、假设变量Lng为长整形变量，下面不能正常执行的语句是 。 A)Lng=16384*2 C)Lng=190^2 B)Lng=4**16384 D)Lng=32768*2 30、在Form_Click事件中执行如下语句的正确结果是 。 Print Format,\ A)123456 B)+123,% C)+123,% D)+123,654 二、阅读程序(每题2分，共20分) 1、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： 程序运行后，单击命令按钮，在文本框中显示的值是什么 Private Sub Command1_Click() Dim i As Integer, n As Integer For i = 0 To 50 i = i + 3 n = n + 1 If i > 10 Then Exit For Next i = Str(n) End Sub 答： 2、建立一窗体并编写下列事件过程，单击窗体执行该事件过程，其输出结果是什么 Private Sub Form_Click() Dim x As Integer x = Int(Rnd + 4) Select Case x Case 5 Print \优秀\ Case 4 Print \良好\ Case 3 Print \合格\ Case Else Print \不合格\ End Select End Sub 答： 3、运行程序，当单击窗体时，窗体上显示内容的第三行是什么 Private Sub Form_Click() Dim s As String, i As Integer, n(9) As Integer Dim s1 As String * 1, j As Integer s = Trim(\ For i = 1 To Len(s) s1 = Mid(s, i, 1) If s1 >= \ j = Val(s1) n(j) = n(j) + 1 End If Next i For j = 0 To 9 Print j; \ Next j End Sub 答： 4、当发生Command1_Click事件后，以下程序输出结果是什么 Private Sub Command1_Click() Dim y As Integer, i As Integer Dim a(8) As Integer y = 18: i = 0 Do a(i) = y Mod 2 i = i + 1 y = y \\ 2 Loop Until y < 1 For j = i - 1 To 0 Step -1 Print a(j); Next j End Sub 答： 5、写出程序运行时单击Command1后，窗体上显示内容的第二行是结果什么。
大学计算机二级VB试卷
