vb语言中for each语句如何按行输出?
在二维数组中用for each 结果总是按列输出很麻烦,所以请高手赐教谢谢
DIM hf(4,4)'定义了一个5*5的二维数组
i=0:j=2
For k=1 To 25
hf(i,j)=k
If k mod 5=0 then
i=i+1
else
i=i-1
If i=-1 then i=4
j=j+1
If j=5 then j=0
end If
next
'输出结果
newline=0
For each temp in hf
If newline mod 5=0 then document.write "<BR>"
Document.write " " & temp & " "
newline=newline+1
Next
说明:
输入时是按行,一行一行输入数组中的.
输出时是按列,一列一列输出的.不我想要的所以请帮忙!
谢谢
终于友人来救火了
谢谢
不过请详细点好吗?
谢谢 二维数组用多重For循环好控制些
页:
[1]