Do While也是循环语句,它分为两种情况,一种是把循环条件放在开头,一种是把循环条件放在结尾。
1、开头判断循环条件
语句格式:
Do Wihle 循环条件
语句块1
[Exit Do]
语句块2
Loop
首先判断循环条件,条件为真则执行Do到Loop之间的语句。
2、结尾判断循环条件
语句格式:
Do
语句块1
[Exit Do]
语句块2
Loop Wihle 循环条件
先执行一次Do到Loop之间的语句,再判断循环条件,满足条件则进行循环。
两种格式的区别:因为第二种格式是把循环体放在尾部,得先执行一遍语句再进行循环条件判断,所以,同样的条件,第二种格式的循环会比第一种多执行一次循环部份的语句。
我们用Do While语句来解决求1——1000的自然数的和的问题:
- Sub mysum()
- Dim Lsum As Long, i As Long
- i = 1
- Do While i <= 1000
- Lsum = Lsum + i
- i = i + 1
- Loop
- MsgBox "1到1000的自然数和为:" & Lsum
- End Sub
复制代码
道勤主机提供365天*24小时全年全天无休、实时在线、零等待的售后技术支持。竭力为您免费处理您在使用道勤主机过程中所遇到的一切问题!
如果您是道勤主机用户,那么您可以通过QQ【792472177】、售后QQ【59133755】、旺旺【诠释意念】、微信:q792472177免费电话、后台提交工单这些方式联系道勤主机客服!
如果您不是我们的客户也没问题,点击页面最右边的企业QQ在线咨询图标联系我们并购买后,我们为您免费进行无缝搬家服务,让您享受网站零访问延迟的迁移到道勤主机的服务! |