查人人中国名人网神州租车车型及价格表:VB计算问题,会的进来帮帮忙,谢谢
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/05 05:50:33
请求大家教教我下列的计算方法及结果:
Private Sub Form_Click()
Dim a as long c As Integer
a=1
Do
c=a+1
Print c
a=a+1
Loop Until a>=5
End Sub
变量C的结果依此为:
Private Sub Form_Click()
Dim a as long c As Integer
a=1
Do
c=a+1
Print c
a=a+1
Loop Until a>=5
End Sub
变量C的结果依此为:
你在前面已经复值a=1！程序在运行到do 这就开始了循环，其循环的过程为：c=a+1,a=1,则c=2，将结果显示在窗体上为：2，接着a=a+1=2,即a=2然后就运行到loop until a>=5, 进行比较如果 a<5 就会返回到do的位置继续循环！如上面一样计算：
a=2,c=a+1=3,a=a+1=3;
a=3,c=a+1=4,a=a+1=4
a=4,c=a+1=5,a=a+1=5
此时a=5,这时满足终止循环的条件，就退出循环！窗体显示结果是：
2
3
4
5
2
3
4
5
2
3
4
5