以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n*m)的一维数组中，完成该程序。
OptionBase 1
Private Sub Command1_Click(Index As Integer)
Dima(1 To 20,1 To 10)
Dim b（　）
ReDimb(1 To 200)
For i=1 To 20
For j=1 To 10
A(i,j)=i*j
Next j
Next i
Tran a,20,10b
End Sub
Sub Tran(a（　）an,n,b（　）)
Dim i As Integer
For i=1 To m
For j=1 To n
______=a(i,j)
Next j
Next i
End Sub

题库:计算机等级考试 类型:填空题 时间:2017-07-03 15:59:09 免费下载:《填空》Word试卷

以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n*m)的一维数组中，完成该程序。
OptionBase 1
Private Sub Command1_Click(Index As Integer)
Dima(1 To 20,1 To 10)
Dim b（　）
ReDimb(1 To 200)
For i=1 To 20
For j=1 To 10
A(i,j)=i*j
Next j
Next i
Tran a,20,10b
End Sub
Sub Tran(a（　）an,n,b（　）)
Dim i As Integer
For i=1 To m
For j=1 To n
______=a(i,j)
Next j
Next i
End Sub

本题关键词:维生素B1,维生素B1片,维生素B1 片,尿维生素B1,维生素B1丸,维生素D3功能,多维元素片(29),多维元素片(21),维生素B1缺乏,生命维他牌多维元素片(中老年型);