[填空题]以下程序的功能是：将一维数组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)。请填空。
OptionBase1
PrivateSubForm_Click()
DimiAsInteger,jAsInteger
DimA(1To100)AsInteger
DimB(1To10,1To10)AsInteger
Fori=1To100
A(i)=Int(Rnd*100)
Nexti
Fori=1To(8)
Forj=1To(9)
B(i,j)=(10)
PrintB(i,j)
Nextj
Print
Nexti
EndSub

教师考试 导游证考试 房产评估类 人资类别 IT计算机证 社会工作 法律类别 职业资格类 外贸类 特种作业考试 交通交规 通信类考试 软考考试 项目管理 计算机等级考试