求怎样把二维数组里的数转存到一维数组中
1个回答
展开全部
先定义一个动态数组
dim a() as integer
再定义二维数组
m=inputbox("二维数组有几行")
n=inputbox("二维数组有几列")
redim a(1 to m, 1 to n)
然后赋值
转变为一维数组：
redim a(m*n) as integer
for j = 1 to m
for k= 1 to n
a((j-1)*n+k) = a(j, k)
next k
next j
不确定对不对……你试一下看看是不是可以帮到你
dim a() as integer
再定义二维数组
m=inputbox("二维数组有几行")
n=inputbox("二维数组有几列")
redim a(1 to m, 1 to n)
然后赋值
转变为一维数组：
redim a(m*n) as integer
for j = 1 to m
for k= 1 to n
a((j-1)*n+k) = a(j, k)
next k
next j
不确定对不对……你试一下看看是不是可以帮到你
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
