以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n)的一 维数组中,请填写空白处,完成该程序。 Option Base 1 Private Sub Commandl_Click()

admin2012-09-07  17

问题 以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n)的一
    维数组中,请填写空白处,完成该程序。
    Option Base 1
    Private Sub Commandl_Click()
    Dim a(1 To 4,I To 5):Dim b()
    ReDim____________
       For i=1 T6 4
           For j=1 To 5
               a(i,j)=i*j
           Next j
       Next i
       CallTransf(a,4,5,b)
    EndSub
    Sub Transf(a(),m,n,b())
    DimxAs Integer
       x=1
       For i=1 To m
           Forj=1 To n
              b(x)=____________
              x=x+1
           Next j
       Nexti
    End Sub

选项

答案b(20) a(i,j)

解析 本题考查二维数组和一维数组的对应关系。二维数组中有20个元素,因此b的大小为20,Redim b(20)。调用丁Tansf函数把m行n列的二维数组存放到一维数组b中,利用二层循环访问数组a的每个元素,依次存放到b中。
转载请注明原文地址:https://kaotiyun.com/show/exhp777K
0

最新回复(0)