下面的程序实现矩阵的转置(即行列互换)。阅读程序并填空。 Option Base 1
Private Sub Form_Click() m=Input
Box(“输入行数”):n=InputBox(“输入列数”) [11]
a(m,n)AS Integer,b(n,m)AS Integer ForI=1 to
m Forj=1 to n
a(I,j)=Int(Rnd*90)+10 Next:Next
ForI=1 to m Forj=1 to n
b(j,1)= [12]
Next:Next End Sub