题目内容
（请给出正确答案）
[主观题]
语句Dim New Array（10)As Integer的含义是（)。A．定义了一个整型变量且初值为10B．定义了10个整数构
语句Dim New Array(10) As Integer的含义是()。
A．定义了一个整型变量且初值为10
B．定义了10个整数构成的数组
C．定义了11个整数构成的数组
D．将数组的第10元素设置为整型
提问人：网友jt_zhj
发布时间：2023-04-18
题目内容
（请给出正确答案）
如搜索结果不匹配，请 您可能会需要：
安装简答题APP，拍照搜题省时又省心！
更多“语句Dim New Array（10)As Integer的…”相关的问题
第1题
（20）运行下列语句后，输出的结果是 Option Base 1 Dim a i=1 A=Array（1,-2,9,0,-1,9) Do K=a（i) For m=10 To k Step -2 Next m Print n+m i=i+1 Loop While Abs（m+n)$amp;
第2题
有如下程序：Option base 1Private Sub Command1_Click Dim arr（10) Arr=Array（10,35,28,90,54,68
有如下程序：
Option base 1
Private Sub Command1_Click
Dim arr(10)
Arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a＞50 then
Sum=sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是
A)数组定义语句不对，应改为Dim arr
B)没有指明For 循环的终值
C)应在For语句之前增加sum=0
D)Next a 应改为next
第3题
有如下程序：Option Base 1Private Sub Command1 Click（）Dim arr（10)arr=Array（10，35，28，90，54，
有如下程序：
Option Base 1
Private Sub Command1 Click（）
Dim arr(10)
arr=Array(10，35，28，90，54，68，72，90)
For Eaeh a In arr
If a＞50Then
Sum=Sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是（）。
A.数组定义语句不对，应改为Dim arr
B.没有指明For循环的终值
C.应在For语句之前增加Sum=0
D.Next a应改为Next
第4题
运行下列语句后，输出的结果是（)。 Option Base 1 Dim a i=1 a=Array（l, -2, 9, 0, -1, 9) Do k=a（
运行下列语句后，输出的结果是()。 Option Base 1 Dim a i=1 a=Array(l, -2, 9, 0, -1, 9) Do k=a(i) For m = 10 To k Step -2 n=k+m Next m Print n+m i=i+1 Loop While Abs(m+n) ＜＞ 27
A．3 27-8
B．3-8 27
C．-8 27 3
D．-8 3 27
第5题
以下（)语句不能创建数组。
A.var myarray=new Array();
B.var myarray=new Array(5);
C.var myarray=new Array("hello","hi","greetings");
D.var myarray=new Array[10];
第6题
运行下列语句后，输出的结果是（)。Option Base 1Dim ai=1a=Array（1,-2,9,0,-1,9)Dok=a（i)For m=10
运行下列语句后，输出的结果是()。
Option Base 1
Dim a
i=1
a=Array(1,-2,9,0,-1,9)
Do
k=a(i)
For m=10 To k Step-2
n=k+m
Next m
Print n+m
i=i+1
Loop While Abs(m+n)＜＞27
A．3 27-8
B．3-8 27
C．-8 27 3
D．-8 3 27
第7题
运行下列语句后，输出的结果是（)。Option Base 1Dim ai=1a=Array（1,-2,9,0,-1,9)Do k=a（i) For m=1
运行下列语句后，输出的结果是()。 Option Base 1 Dim a i=1 a=Array(1,-2,9,0,-1,9) Do k=a(i) For m=10 To k Srep -2 n=k+m Next m Print n+m i=i+1 Loop While Abs(m+n)＜＞27
A．3 27-8
B．3-8 27
C．-8 27 3
D．-8 3 27
第8题
执行以下语句过程，在窗体上显示的内容是Option Base 0Private Sub Command3_Click（)Dim dd=Array
执行以下语句过程，在窗体上显示的内容是
Option Base 0
Private Sub Command3_Click()
Dim d
d=Array("a"，"b"，"c"，"d")
Print d(1);d(3)
End Sub
A．ab
B．bd
C．ac
D．出错
第9题
设有数组定义语句：Dim a（5)As Integer，List1为列表框控件。下列给数组元素赋值的语句错误的是A．a（
设有数组定义语句：Dim a(5) As Integer，List1为列表框控件。下列给数组元素赋值的语句错误的是
A．a(3)=3
B．a(3)=InputBox("inputdata")
C．a(3)=List1.Listlndex
D．a=Array(1，2，3，4，5，6)
第10题
设有数组定义语句:Dim a（5) As Integer,List1为列表框控件。下列给数组元素赋值的语句错误的是A．a
设有数组定义语句:Dim a(5) As Integer,List1为列表框控件。下列给数组元素赋值的语句错误的是
A．a(3)=3
B．a(3)=InputBox("input data")
C．a(3)=List1.ListIndex
D．a=Array(1,2,3,4,5,6)
第11题
（23）设有数组定义语句：Dim a（5)As Integer,并设List1为列表框控件。下列给数组元素赋值的语句错误
（23）设有数组定义语句：Dim a(5)As Integer,并设List1为列表框控件。下列给数组元素赋值的语句错误的是A.a(3)=3 B.a(3)=inputbox("inputdata") C.a(3)=List1.ListIndex D.a=Array(1,2,3,4,5,6)
