如果结果不匹配，请 
更多“Dim a1,a2 as integer 语句声明变量a1和…”相关的问题
下列语句都是在Form中定义的，()是错的
A．Public Const A1=2u
B．Private Const A2=8
C．Public a3 As Integer
D．Private a4 As Integer
A.n=6 : Dim a (1 to n) as integer
B.Dim a(10) as integer : ReDim a(1 to 12)
C.Dim a() as single : ReDim a(3,6) as integer
D.Dim a() as integer : n=6 : ReDim a(1 to n) as integer
A.r=8 : Dim a (1 to r) as integer
B.Dim a(10) as integer : ReDim a(1 to x)
C.Dim a(x) as single : ReDim a(3,6) as integer
D.Dim a() as integer : x=8 : ReDim a(1 to x) as integer
（21 ）下面正确使用动态数组的是
A ）
Dim arr () As Integer
…
ReDim arr (3 , 5 )
B ）
Dim arr () As Integer
…
ReDim arr (50 ) As String
C ）
Dim arr ()
…
ReDim arr (50 ) As Integer
D ）
Dim arr (50 ) As Integer
…
ReDim arr (20 )
下列程序段的执行结果为 ______。 Dim m(3，3)As Integer Dim i As Integer Dim j As Integer Dim K As Integer For i=1 To 3 m(i,i)=i Next For i=0 To 3 For j=0 To 3 x=x+m(i，j) Next Next Print x
A．3
B．4
C．5
D．6
有如下程序。
Private Sub Command1_Click()
Dim k As Integer, m As Integer
Dim op As Integer
k=4: m=1
op=PPC(k, m) : Print op;
op=PPC(k, m) : Print op
End Sub
Private Function PPC(a As Integer, b As Integer)
Static m As Integer, i As Integer
m=0: i=2
i=i + m + 1
m=i + a + b
PPC=m
End Function
程序运行后,输出的结果为
A．4 6
B．6 6
C．8 8
D．10 12
A.Dim arr（1to5）
B.Dim arr（-5to0）AsSstring
C.Dim arr（-2to-5）As Integer
D..Dim arr（10）AsDouble
下列各语句中,正确的是
A) Dim x As Variant=Array(1, 2,3, 4. 5)
B)Dim xo As Integer: x=Array (1, 2:3: 4.5)
C)Dim x As ariant: x=Array(1: abc: 2,3. 41)
D) Dim x As Integer: x=Arra (1, 2, 3+25)
