语句Dim x As Single作用是把x定义为（）变量

A.单精度型

B.整型

C.布尔型

D.字符型

A.132

B.80

C.162

D.120

A.132

B.80

C.162

D.120

A.单精度型

B. 整型

C. 布尔型

D.字符型

A.单精度型

B.整型

C.布尔型

D.字符型

下列程序的作用是求所有小于或等于30的自然数对。该程序不完整，请补充完该程序(程序执行结果见下图)。

注：自然数对是指两个自然数的和与差都是平方数(如8与17)。

Private Sub Command1_Click()

Dim n As Long

Dim m As Long

Dim s As Single

Dim d As String

For n=1 To 30

For m=1 To【 】

s =n+ m

【 】

If Sqr (s)=Int(Sqr(s))【 】Sqr(D)=Int(Sqr(D))Then

Print n：m

End lf

Next m

Next n

End Sub

A.Dim A(9) As Single={1,2,3,4,5,6,7,8,9,10}

B.Dim A() As Single={1,2,3,4,5,6,7,8,9}

C.Dim A() As Single={1,2,3,4,5,6,7,8,9}

D.Dim A(8) As Single={1,2,3,4,5,6,7,8,9,10}

A.Dim A(9) As Single={1,2,3,4,5,6,7,8,9,10}

B.Dim A() As Single={1,2,3,4,5,6,7,8,9}

C.Dim A() As Single={1,2,3,4,5,6,7,8,9}

D.Dim A(8) As Single={1,2,3,4,5,6,7,8,9,10}

A.Dim Var As Integer, sum As Single

B.Dim Var As Integer, sum As Double

C.Dim Var As Single, sum As Double

D.Dim Var As Doluble, sum As Single

A.Dim A[3,4] As Intiger

B.Dim A(3,4) As String

C.Dim A(N,N) As Single

D.Dim A(3 4) As Integer

A.Dim A[3,4] As Intiger

B.Dim A(3,4) As String

C.Dim A(N,N) As Single

D.Dim A(3 4) As Integer