高校问答冒险岛2魔法师好么:VB数组的问题!!!!!
来源：百度文库 编辑：高校问答 时间：2024/04/29 05:54:00
option base 1
private sub command1_click()
dim a
a =array(1,2,3,4)
j=1
for i=4 to 1 step -1
s=s + a(i)*j
j=j*10
next i
print s
end sub
知道了结果1234 ,可是不知道怎么来的?? 知道的麻烦说了,详细点哦,谢谢!!
private sub command1_click()
dim a
a =array(1,2,3,4)
j=1
for i=4 to 1 step -1
s=s + a(i)*j
j=j*10
next i
print s
end sub
知道了结果1234 ,可是不知道怎么来的?? 知道的麻烦说了,详细点哦,谢谢!!
option base 1 '数组下标从1开始，而不是默认的零
private sub command1_click()
dim a
a =array(1,2,3,4) '给数组a()赋值,即a(1)=1,a(2)=2,a(3)=3,a(4)=4
j=1
for i=4 to 1 step -1'for循环,i的值从4到1,每次递减1
s=s + a(i)*j 's初始化值是0,所以第一次循环s = 0+4*1 = 4,第二次s = 4 + 4 *10 =34,第三次 s = 34 + 2*100 =234 ,第四次s = 234 +1 *1000 =1234
j=j*10 'j的值每次增加10倍
next i
print s '输出就是1234
end sub
你不会用调试跟踪吗？