问题：
（填空题）填空题：将一维数组元素赋值给二维数组并打印
以下程序的功能是：将一维数组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)。请填空。
```vb 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 (8) For j = 1 To (9) B(i, j) = (10) Print B(i, j) Next j Print Next i End Sub ```
提问：
请问如何填写程序中的空白部分以确保正确地将一维数组A的元素赋值给二维数组B？这个问题的重点是考察什么知识点？这个章节的主要内容是什么？
复习要点：
理解数组下标的计算和循环控制结构，以及如何将一维数组的数据映射到二维数组中。
查阅资料方向：
查阅关于数组操作和循环控制的资料。
参考答案：