ExcelVBA之Do while循环

VB有两种Do循环语句，只要或者直到某个条件为真，它们就会重复一系列的语句。只要条件为真，Do…While循环就允许你重复某个操作。这个循环的语法如下：

Do While 条件
语句1
语句2
语句N
Loop

当VB遇到这个循环时，它首先条件的真假，如果条件为假，循环内部的语句就不会被执行，VB将继续执行关键字Loop后面的第一条语句。如果条件为真，循环里面的语句则会被一条一条地执行，直到遇到Loop语句。Loop语句告诉VB重复这个过程，只要Do While语句里的条件为真的话。

Sub TenSeconds()
Dim stopme
stopme = Now + TimeValue("00:00:10")
Do While Now < stopme
Application.DisplayStatusBar = True
Application.StatusBar = Now
Loop
Application.StatusBar = False
End Sub

在上面的程序里，只要函数Now返回的时间小于变量stopme的值，Do…While循环里的语句就会被执行。变量stopme储存值为当前时间加上十秒（参见在线帮助里的另外一个使用内置函数TimeValue的例子）。
语句Application.DisplayStatusBar告诉VB打开状态栏的显示，下条语句则是将当前日期和时间放在状态栏上。当显示时间时（只显示10秒）用户无法使用系统（光标变成了沙漏）。十秒钟后（也就是，当条件Now < stopme为真），VB跳出循环并且执行关键字Loop后面的语句，该语句将状态栏返回到默认信息“就绪”。

技巧：什么是循环？
循环是一种导致一部分程序代码重复执行的编程结构。VBA提供了多种结构在你的过程里执行循环：

Do…While, Do…Until, For…Next, For…Each, and While…Wend

另一种do while

Do
语句1
语句2
语句N
Loop While 条件

Sub SignIn()
Dim secretCode As String
Do secretCode = InputBox("Enter your secret code:")
If secretCode = "sp1045" Then Exit Do
Loop While secretCode <> "sp1045"
End Sub

ExcelVBA之Do while循环相关推荐

中兴面试总结，华为。技术，市场
1,软件测试,如何把这个测试做的更好. 进到一个新项目,作为测试人员应该都是想把测试做好,项目在符合客户质量要求的情况下按时交付的吧.但往往都事与愿违,造成这个结果的原因有很多很多.通过这段时间做自动 ...
Excel-VBA 快速上手（二、条件判断和循环）
文章目录一.条件判断 1.1. IF 判断 1.2. Select Case 判断 1.3. IIF 判断二.循环 2.1. For 循环 2.1.1. 按次数循环 2.1.2. 数组遍历 2.2 ...
vb表格控件_（超级干货）ExcelVBA拆分表格并分别发送邮件增强版
这是POINT小数点的第 339 篇文章点点写在前面: 之前我们有分享过一个场景1:你制作了一份总表你想要拆分成各个分公司,并且你需要对分公司的多个同事发送邮件.如果有20几个分公司,你要拆分+写邮 ...
Excel-VBA文件操作
本文转载自https://blog.csdn.net/threshold1980/article/details/78864240 Excel-VBA操作文件四大方法在我们日常使用Excel的时候, ...
Excel-VBA应用（5）：设计问卷及数据回收统计系统
一.需求市场调查的目的是为管理和决策部门提供准确的.可靠的.有效的当前信息,有时是为了制定长远性的战略性规划,有时是为制定某阶段或针对某问题的具体政策或策略提供参考依据. 正确的决策不是靠直觉和猜测 ...
Excel-VBA操作文件四大方法之一（转）
Excel-VBA操作文件四大方法之一 https://www.cnblogs.com/top5/archive/2009/10/29/1591937.html 在我们日常使用Excel的时候,不仅会 ...
Excel-VBA操作文件四大方法
原文地址为: Excel-VBA操作文件四大方法 Excel-VBA操作文件四大方法之一在我们日常使用Excel的时候,不仅会用到当前Excel文件的数据,还经常需要访问其他的数据文件.这些数据文件 ...
Linux shell 学习笔记（9）— 循环语句（for、while）以及更改字段分隔符
1. for 语句 bash shell 中 for 命令的基本格式如以下,$var 变量包含着这次迭代对应的当前列表项中的值. for var in list docommands done 也可以 ...
【机器学习】RNN循环神经网络
循环神经网络归属: 领域:机器学习方向:自然语言处理贡献:自动文本生成循环神经网络实际应用: 生活中因为原始数据都是序列化的,比如自然语言,语音处理,时间序列问题(股票价格)等问题, 这个时候需 ...

ExcelVBA之Do while循环

ExcelVBA之Do while循环相关推荐

最新文章

热门文章