2017年9月计算机二级考试VB测试题

2017年计算机二级考试将在就业开始。你报考了VB科目吗?你知道怎样复习计算机二级考试VB 科目吗?为了方便考生备考计算机二级考试VB 科目。下面是小编为大家带来的计算机二级考试VB测试题，欢迎阅读。

　　测试题一：

1. 下面关于图片框和图像框的说法中正确的是(　　　)

(A) 图像框和图片框均可通过Print方法显示文本

(B) 在图像框里只能显示图片，不能包含其它控件，而图片框可以包含控件

(C) 图像框比图片框占用的内存多、运行速度慢

(D) 在图片框和图像框中显示的图片均可放大和缩小

2. 在窗体上画两个名称为Text1和Text2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

Dim x As Integer, n As Integer

x = 1

n = 0

Do While x < 20

x = x * 3

n = n + 1

Loop

= Str(x)

= Str(n)

End Sub

程序运行后，单击命令按钮，在两个文本框中显示的值分别是(　　　)

(A)15和1 (B)27和3 (C)195和3 (D)600和4

3. 在窗体上画一个名称为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

= Str(n)

End Sub

程序运行后，单击命令按钮，在文本框中显示的值是(　　　)

(A)2 (B)3 (C)4 (D)5

4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Comman1_Click( )

x = 0

n = InputBox(“ “)

For i = 1 To n

For j = 1 To i

x = x + 1

Next j

Next i

Print x

End Sub

程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是(　　　)

(A)3 (B)4 (C)5 (D)6

5. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

For i = 1 To 4

x = 4

For j = 1 To 3

x = 3

For k = 1 To 2

x = x + 6

Next k

Next j

Next i

Print x

End Sub

程序运行后，单击命令按钮，输出结果是(　　　)

(A)7 (B)15 (C)157 (D)538

6. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command_Click( )

x = 0

Do Until x = -1

a = InputBox(“请输入A的值：”)

a = Val(a)

b = InputBox(“请输入B的值：”)

b = Val(b)

x = InputBox(“请输入x的值：”)

x = Val(x)

a = a + b + x

Loop

Print a

End Sub

程序运行后，单击命令，依次在输入对话框中输入5、4、3、2、1、-1，则输出的结果为(　　　)

(A)2 (B)3 (C)14 (D)15

7. 在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的'标签，然后编写如下事件过程：

Private Sub Command1_Click( )

s = 0

For i =1 To 15

x = 2 * i -1

If x Mod 3 =0 Then s = s + 1

Next i

ion = s

End Sub

程序运行后，单击命令按钮，则标签中显示的内容是(　　　)

(A)1 (B)5 (C)27 (D)45

8. 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：

Private Sub Command1_Click( )

a =

Select Case n

Case 1 To 20

x = 10

Case 2,4,6

x = 20

Case Is < 10

x = 30

Case 10

x = 40

End Select

= x

End Sub

程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是(　　　)

(A)10 (B)20 (C)30 (D)40

9. 有如下程序：

a = 10

b = 4

For j = 1 To 20 Step -2

a = a + 5

b = b + 4

Next j

Print a;b

运行后，输出的结果是(　　　)

(A)10　4 (B)60　24 (C)110　44 (D)55　40

10. 设有如下程序：

Private Sub Command1_Click( )

Dim sum As Double, x As Double

sum = 0

n = 0

For i = 1 To 5

x = n / i

n = n + 1

sum = sum + x

Next

End Sub

该程序通过For循环计算一个表达式的值，这个表达式是(　　　)

(A)1 + 1 /2 + 3/ 4 + 4 / 5 (B)1 + 1 /2 + 2 / 3 + 3 / 4

(C)1 / 2 + 2 / 3 + 3 / 4 + 4 / 5 (D)1 + 1 / 2 + 1 / 3 + 1 / 4 + 1 / 5

　　测试题二：

1. 语句Print Format$(12345,”#######”);Format$(12345,”###”)的输出结果是(　　　)

(A)12345□□12345 (B)1234512345

(C)12345□123 (D)□□12345123

2. 下列语句执行后，产生的信息框的标题是(　　　)

Dim s As String

s = MsgBox(“ABCD”,,”EFGH,””,5)

(A)ABCD (B)无标题 (C)EFGH (D)程序出错

3. 执行语句Print Format(1234.567, “##,##0.00”)后，输出结果是(　　　)

(A)1234.57 (B)1,234.57 (C)1,234.567 (D)1,234.56

4. 下列事件过程运行时，信息框中出现的结果是(　　　)

Private Sub Command1_Click( )

MsgBox Str(123+123)

End Sub

(A)123+345 (B)123 (C)246 (D)显示出错信息

5. 以下能够触发文本框Change事件的操作是(　　　)

(A)文本框失去焦点 (B)文本框获得焦点

(C)设置文本框的焦点 (D)改变文本框的内容

6. 表示滚动条控件取值范围最大值的属性是(　　　)

(A)Max (B)LargeChange (C)Value (D)Max-Min

7. 当某个单选按钮处于选中状态时，它的(　　　)属性为Ture

(A)Caption (B)Value (C)Style (D)Checked

8. 复选框的状态有(　　　)种，可通过设置它的(　　　)属性来设置它的状态

(A)1 (B)2 (C)3 (D)4

(A)Alignment (B)Value (C)Style (D)Checked

9. 要使文本框在显示文字时，只显示出一串“*”，则应把它的(　　　)属性设置为“*”

(A)Caption (B)PasswordChar (C)Text (D)Value

10. 在下面四组图形格式中，全部都是Visual Basic支持的图形文件是(　　　)

(A) 位图、图标、3DS图形文件、GIF文件

(B) 位图、Flash图形文件、图标文件、GIF文件

(C) 位图、Flash图形文件、3DS图形文件、GIF文件

(D) 位图、图标、图元文件、JPEG文件、GIF文件