将具有100个元素的数组A按每行10个数的形式赋值给二维数组B.即将A(1)到A(10)依次赋值B(1,1)到B(

问题描述:

将具有100个元素的数组A按每行10个数的形式赋值给二维数组B.即将A(1)到A(10)依次赋值B(1,1)到B(
麻烦把***的地方补下
private sub command_click()
dim A(1 to 100)AS integer,B(1 to 10,1to 10)ASinteger
for i=1 to
print B(i,j);
next J
print
next i
end sub
1个回答 分类:综合 2014-09-26

问题解答:

我来补答
依次为:
100
10
10
A(10*(i-1)+j)
 
 
展开全文阅读
剩余:2000