是这样的VB语法里 对多维数组preserve关键字使用 有规定 只能写成 redim preserve a(1 To 2, 1 To m) （即对多维数组 如想保存原内容 且是动态改变维数时 只能改变最后一维的上界 ） 所以你可以将行列 调换一下： （其实从主观 理解 两者并没差多少啊 行列的含义调换一下而已） Private a() As Single Private Sub Command1_Click() Static m As Integerm = m + 1ReDim Preserve a(1 To 2, 1 To m) As Single a(1, m) = Val(InputBox(序号))
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024