有两个数组a(10,10),b(10,10)
如果a(i,j)=1,那么求出对应的b(i,j)的值,并将b(i,j)保存到文本文件中.
我是新手,寻求帮助

for i = 1 to 10
for j = 1 to 10
if a(i,j)=1 then
debug.print b(i,j)
end if
next
next

Open FileName For Output As #1
Print #1, b(i,j)
Close

又被你先占了

你还是去闭关吧..
你的速度..太不行了..

你们这是帮人做作业?这么简单的问题都不会,明显连编程超级超级超级初级教程都没看过的人....

谢谢你们!
可是运行到
print#1,b(i,j)时,出现下标越界

帮人做作业.是好事.

[此贴子已经被作者于2007-9-25 13:55:08编辑过]

工作需要,刚开始学习VB

我一般不帮人做作业,作业倒是经常被人抄