作业帮 > 综合 > 作业

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

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/08 01:08:30
将具有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
依次为:
100
10
10
A(10*(i-1)+j)