展开全部
dim i as integer,j as integer
假设有二维数组 a(2,3)
const r as integer=2
const c as integer=3
dim b((2+1)*(3+1) -1） '定义个新的一维数组
for i=0 to r
for j=0 to c
b(i*(3+1)+j)=a(i,j) '把二维数组的所有元素赋值到一维数组
next j
next i
for i=0 to ubound(b)
print b(i) '打印一维数组
next
假设有二维数组 a(2,3)
const r as integer=2
const c as integer=3
dim b((2+1)*(3+1) -1） '定义个新的一维数组
for i=0 to r
for j=0 to c
b(i*(3+1)+j)=a(i,j) '把二维数组的所有元素赋值到一维数组
next j
next i
for i=0 to ubound(b)
print b(i) '打印一维数组
next
更多追问追答
追问
b(i*(3+1)+j)=a(i,j) '把二维数组的所有元素赋值到一维数组
这一排老是报下标越界
追答
没问题的。
你的数组 a(2,3)初始化了吗？
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
eur fhysdjsg
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
