结果为什么是6?

来源:百度知道 编辑:UC知道 时间:2024/06/08 20:21:16
关于On...Goto命令~我想知道这段程序执行过程
=========================
Private Sub Command1_Click()
x=10:i=1:z=Int(Rnd(x)+2)
On z Goto 50,60,70
i=i+1
50:i=i+1
60:i=i+2
70:i=i+3
Print i
End Sub

x=10
i=1
z=Int(Rnd(x)+2) 'Rnd(10)返回一个小於1大於0的小数,Rnd(x)+2结果为2.xxx,Int函数取整后结果为2
On z Goto 50,60,70 ,因为z=2,此语句跳转至60行
i=i+1
50:i=i+1
60:i=i+2 'i=i+2 => i=3
70:i=i+3 'i+3 => i=6
Print i

多看书或MSDN。

很久不看VB了,楼上说的思路很对,想问问楼上,那个RND(10)产生的是0<X<1的数吗?我不太记得了。。。