以下程序的功能是：将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来，要求把A(i)到A(10)依次赋给B(1，1)到B(1，10)，把A(11)到A(20)依次赋给
B(2，1)到B(2，10)，……，把A(91)到A(100)依次赋给B(10，1)到B(10，10)。请填空。
Option Base 1
Private Sub Form_Click()
Dim i As Integer，j As Integer
Dim A(1 To 100)As Integer
Dim B(1 To 10,1 To 10)As Integer
For i=1 To 100
A(i)=Int(Rnd*100)
Next i
For i=1 To【 】
For j＝1 To【 】
B(i,j)＝【 】
Print B(i,j)；
Next j
Next i
End Sub
第1题：
实现模拟窗体菜单功能，实现对一维二维数组基本操作进行测试，具体菜单功能如下： 当输入11、12、13，分别执行一维数组数据录入；执行一维数组的每个元素增加10，并提示操作成功；显示一维数组的所有元素； 当输入21、22、23，分别执行二维数组数据录入；执行二维数组的每个元素增加5，并提示操作成功；显示二维数组的所有元素； 当输入quit，则退出
第2题：
2、下面关于二维数组的说法错误的是
A．同行的数据在内存中连续存放。
B．对全部数组元素都赋初值时，可以不指定数组第二维的长度。
C．不能将二维数组作为一个整体输入与输出。
D．将二维数组看作是一维数组时，该一维数组的每个元素本身又是一个一维数组。
第3题：
本题中定义了长度为20的一维整型数组a，并将数组元素的下标值赋给数组元素，最后打印输出数组中下标为奇数的元素。 public class javal{ public static void main(String[]args){ int a[]= ； int i； for( ；i++) a[i]=i； for(i=0；i<20；i++){ if( ) System．OUt．print("a[It+i+"]="+a[i]+"，")； } } }
第4题：
下列事件过程的功能是：通过Foma_Load事件给数组赋初值为35、48、15、22、67， Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容，将程序补充完整。
Dim Arr()
Private Sub Form_Load()
______
End Sub
Private Sub Form_CUck()
For EaCh x In Arr
If Int(x/3)=x/3 Then
Pdnt X
第5题：
关于数组，下列说法正确的是()
A、对数组的初始化操作在定义数组的同时进行
B、给数组赋初值时，必须所有数组元素都被赋值
C、给数组元素全部赋初值时，一定要指明数组的大小。
D、引用数组元素的时候，可以一次引用数组中的全部元素
第6题：
（ 9 ）以下程序的功能是：将一维数组 A 中的 100 个元素分别赋给二维数组 B 的每个元素并打印出来，要
求把 A(1) 到 A(10) 依次赋给 B(1,1) 到 B(1,10) ，把 A(11) 到 A(20) 依次赋给 B(2,1) 到 B(2,10) ， …… ， 把
A(91) 到 A(100) 依次赋给 B(10,1) 到 B(10,10) 。请填空。
Option Base 1
Private Sub Form_Click()
Dim i As Integer, j As Integer
Dim A(1 To 100) As Integer
Dim B(1 To 10, 1 To 10) As Integer
For i = 1 To 100
A(i) = Int(Rnd * 100)
Next i
For i = 1 To 【 9 】
For j = 1 To 【 10 】
B(i, j) = 【 11 】
Print B(i, j);
Next j
Next i
End Sub
第7题：
本题中定义了长度为20的－维整型数组a，并将数组元素的下标值赋给数组元素，最后打印输出数组中下标为奇数的元素。 public class javal{ public static void main(String[]args){ int a[]= Int i： for a[i]=i for i++) =1： i=0；i<20；i++){ System．out．print(”a[”+i+”]=”+a[i]+”，“)； }
第8题：
下列事件过程的功能是：通过Form_Load事件给数组赋初值为35、48、15、22、67，Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填入适当的内容，将程序补充完整。
Dim Arr（）
Private Sub Form_Load（）
【8】
End Sub
Private Sub Form_Click（）
【9】
If Int（x / 3） =x / 3 Then
Print x
End If
Next x
End Sub
第9题：
以下程序的功能是：将一维组 A 中的 100 个元素分别赋给二维数组 B 的每个元素并打印出来，要求把 A （ 1 ）到 A （ 10 ）依次赋给 B （ 1 ， 1 ）到 B （ 1 ， 10 ），把 A （ 11 ）到 A （ 20 ）依次赋给 B （ 2 ， 1 ）到 B （ 2 ， 10 ），……，把 A （ 91 ）到 A （ 100 ）依次赋给 B （ 10 ， 1 ）到 B （ 10 ， 10 ）。请填空。
Option Base 1
Private Sub Form_Click（）
Dim i As Integer,j As Integer
Dim A（1 To 100） As Integer
Dim B（1 To 10,1 To 10） As Integer
For i=1 To 100
A（i）=Int（Rnd * 100）
Next i
For i=1 To ________
For j=1 To ________
B（i,j）= ________
Print B（i,j）;
Next j
Next i
End Sub