Dim x As Variant与下列哪个语句等价（）。

A:Dimx! B:Dimx% C:Dimx D:Dimx＃

如果一个变量未经定义就直接使用，则该变量的类型为

A:Integer Byte Boolean Variant

若变量a未事先定义而直接使用，变量b在定义的时候省略其数据类型，则变量a和b的数据类型分别为______。

A:Integer, Variant B:Variant, String C:Boolean, String D:Variant,Variant

设有如下一段程序：
Private Sub Command1_Cliek( )
Static a As Variant
a=Array("one", "two", "three", "four five")
Print a(3)
End Sub
针对上述事件过程，以下叙述中正确的是( )。

A:变量声明语句有错，应改为Static a(5)As Variant B:变量声明语句有错，应改为static a C:可以正常运行，在窗体上显示three D:可以正常运行，在窗体上显示four

设有如下程序：
Private Sub search(a（　）As Variant，ByVal key As Variant，index%)
Dim I％
For I = Lbound(

A:To Ubound(

设有如下程序：
Private Sub search(a( )As Variant，ByVal key As Variant，index%)
Dim I%
For I=LBound(

A:To UBound(a)

设有如下程序：
Private Sub search(a(
)As Variant, ByVal key As Variant, index%)
　　Dim I%
　　For I = LBound

A:To UBound(a)
&n

设有如下程序： Private Sub search(a（　）As Variant，ByVal key As Variant，index%) Dim I% For i=LBound(A) To UBound(A) If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load（　） Show Dim b（　） As Variant Dim n As Integer b=Array(1，3，5，7，9，11，13，15) Call search(b，11，n) Print n End Sub 程序运行后，输出结果是 【6】 。

设有如下一段程序：
Private Sub Command1_Click（　）
Static a As Variant
a=Array("one","two","three","four","five")
Print a(3)
End Sub
针对上述事件过程，以下叙述中正确的是（）。

A:变量声明语句有错，应改为Static a(5)As Variant B:变量声明语句有错，应改为Static a C:可以正常运行，在窗体上显示three D:可以正常运行，在窗体上显示four