以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n*m)的一维数组中，完成该程序。 OptionBase 1 Private Sub Command1_Click(Index As Integer)

admin2012-03-22 59

问题以下程序的功能是将多维数组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

选项

答案b((i-1)*n+j)

解析

转载请注明原文地址:https://kaotiyun.com/show/fUhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类