设有如下语句：Dim a,b As Integerc="Visual Basic"d=#7/20/2005#以下关于这段代码的叙述中，错误

设有如下数组声明语句：

Dim am(-2 To 2,0 To 3)As Integer

该数组包含的数组元素个数是

A)20

B)16

C)15

D)12

设有如下语句： Dim a，b As Integer c="VisualBasic" d=#7/20/2005# 以下关于这段代码的叙述中，错误的是()。

A．a被定义为Integer类型变量

B．b被定义为Integer类型变量

C．c中的数据是字符串

D．d中的数据是日期类型

设有如下语句： Dim a,b As Integer c="Visual Basic" d=#7/20/2005# 以下关于这段代码的叙述中，错误的是______。

A．a被定义为Integer类型变量

B．b被定义为Integer类型变量

C．c中的数据是字符串

D．d中的数据是日期类型

设有如下变量声明语句：

Dim a，b As Boolean

则下面叙述中正确的是

A．a和b都是布尔型变量

B．a是变体型变量，b是布尔型变量

C．a是整型变量，b是布尔型变量

D．a和b都是变体型变量

设有如下语句：

Dim a，b As Integer

c="VisualBasic"

d=#7／20／2005#

以下关于这段代码的叙述中，错误的是（）。

A．a被定义为Integer类型变量

B．b被定义为Integer类型变量

C．c中的数据是字符串

D．d中的数据是日期类型

A.a和b都是布尔型变量

B.a是变体型变量，b是布尔型变量

C.a是整型变量，b是布尔型变量

D.a和b都是变体型变量

A.a和b都是布尔型变量

B.a是变体型变量，b是布尔型变量

C.a是整型变量，b是布尔型变量

D.a和b都是变体型变量

设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1_Click() Dim a(30) As Integer For i=1 To 30 a(i)=Int(Rnd*100) Next For Each arrItem In a If arrItem Mod 7=0 Then Print arrItem If arrItem＞90 Then Exit For Next End Sub 对于该事件过程，以下叙述中错误的是______。

A．a数组中的数据是20个100以内的整数

B．语句For Each arrItem In a有语法错误

C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数

D．If arrItem＞90……语句的作用是当数组元素的值大于90时退出For循环

设有命令按钮Command1的单击事件过程，代码如下：

Private Sub Command1_Click（）

Dim a（30）As Integer

For i=1 To 30

a（i）=Int（Rnd*100）

Next

For Each arrItem In a

If arrItem Mod 7=0 Then Print arrItem；

If arrItem＞90 Then Exit For

Next

End Sub

对于该事件过程，以下叙述中错误的是（）。

A．a数组中的数据是30个100以内的整数

B．语句For Each arrItem In a有语法错误

C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数

D．If arrItem＞90……语句的作用是当数组元素的值大于90时退出For循环

设有声明语句 Option Base 1 Dim b(-1 To 2 To 20) As Integer

A．2310

B．1920

C．1500

D．165B

设有语句组：

Dim S1 As String*5

S1 = "VB Test"

则S1的值为()。

A、 VB Test

B、 VB Te

C、 VBTes

D、 BTest