以下程序的功能是：将一维数组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)= (10)
　　　　　　　Print B(i,j)；
　　　　　Next j
　　　　　Print
　　　Next　i
End Sub

请根据所提供的单据完成下列20道判断题。
某公司出口一批货物，由于市场原因，该批货物在国外销售不佳。经与国外客户协商，双方同意按出口单价将部分货物退运。
货物出口报检时，《出境货物报检单》有关内容填写情况如下，请对下列20题作出判断：

“信用证号”：LC7584076584。