每个循环的VBA

VBA（Visual Basic for Applications）是用于在Microsoft Office应用程序中编写宏的编程语言。循环是VBA中常用的编程结构之一，允许您重复执行一系列的指令。在本文中，我们将介绍VBA中常用的循环类型，并提供一些示例代码供程序员参考。

1. For 循环

For 循环是VBA中最常见的循环类型之一，用于重复执行指定次数的代码块。下面是一个简单的 For 循环的示例：

For i = 1 To 10
    ' 执行重复的代码块
    MsgBox "当前值为：" & i
Next i

在上面的代码中，i 是循环计数器，从1开始逐步递增到10。每次循环执行完毕后，i 的值会自动递增。你可以根据需要在循环内执行任意的代码块。

2. Do While 循环

Do While 循环用于在给定条件为真时重复执行代码块。下面是一个简单的 Do While 循环的示例：

i = 1
Do While i <= 10
    ' 执行重复的代码块
    MsgBox "当前值为：" & i
    i = i + 1
Loop

在上面的代码中，循环会在i 小于等于10时一直执行。每次循环执行完毕后，i 的值会递增。如果条件不满足，则会跳过循环体。

3. Do Until 循环

Do Until 循环与 Do While 循环相似，不同之处在于它会在给定条件为假时重复执行代码块。下面是一个简单的 Do Until 循环的示例：

i = 1
Do Until i > 10
    ' 执行重复的代码块
    MsgBox "当前值为：" & i
    i = i + 1
Loop

在上面的代码中，循环会在i 大于10时停止执行。每次循环执行完毕后，i 的值会递增。如果条件不满足，则会跳过循环体。

4. For Each 循环

For Each 循环用于遍历集合或数组中的每个元素。下面是一个简单的 For Each 循环的示例：

Dim arr As Variant
arr = Array("苹果", "香蕉", "橙子")

For Each item In arr
    ' 执行重复的代码块
    MsgBox "当前水果是：" & item
Next item

在上面的代码中，循环会遍历数组arr 中的每个元素，并将每个元素赋给item 变量。你可以根据需要在循环内执行任意的代码块。

以上是VBA中常用的循环类型的介绍和示例代码。你可以根据实际需求选择适合的循环类型来重复执行指定的代码块。编写高效的循环可以提高程序的性能和可读性。