以下程序的功能是:将一维组 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 Print Next i End Sub