[填空題] 以下程序的功能是將多維數(shù)組a(1 To m,1 To n)中的元素轉(zhuǎn)移到一個(gè)名為b(1 To n*m)的一維數(shù)組中,完成該程程序。 Option
2021-07-20
[填空題] 以下程序的功能是將多維數(shù)組a(1 To m,1 To n)中的元素轉(zhuǎn)移到一個(gè)名為b(1 To n*m)的一維數(shù)組中,完成該程程序。
Option Base 1
Private Sub Command1_Click()
Dim a(1 To 20,1 To 10)
Dim b()
ReDim b(1 To 200)
For i=1 To 20
For j=1 To 10
A(i,j)=i*j
Next j
Next i
Call Tran(a,20,10,B)
End Sub
Sub Tran(a(),m,n,b()
Dim i As Integer
For i=1 To m
For i=1 To n
(6) =a(i,j)
Next j
Next i
End Sub
正確答案:b((i-1)*n+j)
參考解析:i為行,j為列。(i-1)*n意思是第二行以上的行移到上一行的后邊。j為當(dāng)前行的位數(shù)。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。