题目内容：

[试题]（ 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()

D．im i As Integer, j As Integer

D．im A(1 To 100) As Integer

D．im B(1 To 10, 1 To 10) As Integer

F．or i = 1 To 100

A．(i) = Int(Rnd * 100)

Next i

F．or i = 1 To ( 9 )

F．or j = 1 To ( 10 )

B．(i, j) = ( 11 )

Print B(i, j);

Next j

Print

Next i

E．nd Sub