Excel VBA编程Do … Loop循环.docx

上传人:小飞机 文档编号:3156598 上传时间:2023-03-11 格式:DOCX 页数:2 大小:36.78KB
返回 下载 相关 举报
Excel VBA编程Do … Loop循环.docx_第1页
第1页 / 共2页
Excel VBA编程Do … Loop循环.docx_第2页
第2页 / 共2页
亲,该文档总共2页,全部预览完了,如果喜欢就下载吧!
资源描述

《Excel VBA编程Do … Loop循环.docx》由会员分享,可在线阅读,更多相关《Excel VBA编程Do … Loop循环.docx(2页珍藏版)》请在三一办公上搜索。

1、Excel VBA编程 Do Loop循环Excel VBA编程 Do Loop循环 DoLoop语句提供了一种结构化与适应性更强的方法来执行循环。它可以用于控制循环次数未知的循环结构。另外,当使用该语句去运行语句块时,条件为True或直到条件变成True时,重复此语句。当为False时,则立即跳出该语句。 语法: Do While | Until condition statements Exit Do statements Loop 或者, Do statements Exit Do statements Loop While | Until condition 其中,在该循环结构中,主要

2、包含以下两个参数,其功能如下: l l condition 可选参数。数值表达式或字符串表达式,其值为True或False。如果condition是Null,则condition会被当作False。 Statements 一条或多条命令,它们将被重复执行,直到condition为True。 接下来介绍DoLoop语句的用法。在下面的示例中,内层的DoLoop语句循环到第10次时将标志值设置为False,并用Exit Do语句强制退出内层循环。外层循环则在检查到标志值为False时,退出该循环,其代码如下: Dim Check, Counter Check = True: Counter = 0 设置变量初始值。 Do 外层循环。 Do While Counter 20 内层循环。 Counter = Counter + 1 计数器加一。 If Counter = 10 Then 如果条件成立。 Check = False 将标志值设成 False。 Exit Do 退出内层循环。 End If Loop Loop Until Check = False 退出外层循环。

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 生活休闲 > 在线阅读


备案号:宁ICP备20000045号-2

经营许可证:宁B2-20210002

宁公网安备 64010402000987号