VBS基础篇 - 循环语句(3) - For...Next

最新推荐文章于 2023-07-24 10:45:42 发布

weixin_34007906

最新推荐文章于 2023-07-24 10:45:42 发布

阅读量362

点赞数

本文详细介绍了For...Next循环的基本语法及使用方法，包括如何指定循环次数、设置计数器的步长，以及如何利用ExitFor提前退出循环。通过具体的示例代码展示了不同场景下For...Next循环的应用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

　　指定循环次数，使用计数器重复运行语句，语法结构如下：

For counter = start To end [Step step]
    [statements]
    [Exit For]
    [statements]
Next

主要参数：

counter：用做循环计数器的数值变量。这个变量不能是数组元素或用户自定义类型的元素。

start：counter的初值。

end：counter的终值。

step：counter的步长。如果没有指定，则step的默认值为1。

具体示例代码如下：

For…Next

Dim Count:Count = 0 '定义一个变量，并赋值为0
For i = 1 To 10 '循环10次
    Count = Count + 1
Next
MsgBox Count '输出10

Step设置计数器循环步长

Dim Count:Count = 0 '定义一个变量，并赋值为0
For i = 1 To 10 Step 2 '设置计数器步长为2，循环5次
    Count = Count + 1
Next
MsgBox Count '输出5

退出循环

Exit For 语句用于在计数器达到其终止值之前退出 For...Next 语句。因为通常只是在某些特殊情况下（例如在发生错误时）要退出循环，所以可以在 If...Then...Else 语句的 True 语句块中使用 Exit For 语句。如果条件为 False，循环将照常运行。

Dim Count:Count = 0 '定义一个变量，并赋值为0
For i = 1 To 10 '循环10次
    Count = Count + 1
    If Count = 5 Then '当变量Count的值为5时，退出当前循环
        Exit For
    End If
Next
MsgBox Count '输出5