小白求教一个数组计算问题

fmlzy531 · 发表于 2011-7-25 11:12:48

Dim a()
a=array(1,3,5,7,9)
s=0
For i=1 to 4
s=s*10+a(i)
next i
print s
最后的S是多少呀？能不能帮我分析一下，感激不尽

fmlzy531 · 发表于 2011-7-25 11:48:08

回复 roych 的帖子

我懂了！谢谢！犯迷糊了。。。

roych · 发表于 2011-7-25 11:46:31

数组默认是从0开始的。。。。

fmlzy531 · 发表于 2011-7-25 11:39:58

回复 roych 的帖子

为什么a(1)=3呢？还有这道题跟数组的下限是0有什么关系，我被答案的解释弄晕了。。。。

roych · 发表于 2011-7-25 11:31:20

第一个S是，s=0，a(1)=3,所以赋值后得到的是：S=0*10+3=3
第二个是：S=3*10+5=35
……如此类推，S最终是3579。
或者你可以用Debug.Print来试试看

帐号		自动登录	找回密码
密码			注册

[模块/函数] 小白求教一个数组计算问题

群介绍
主题无相 (随机显示版	同地区群块其他地区)