回覆列表
-
1 # 小飛飛的小朋友
-
2 # 可樂追影
在VBA中,可以使用While語句創建一個循環,以便在滿足一定條件時反復執行一段代碼。While語句的基本語法如下:
While condition
' 要重複執行的代碼
Wend
其中,condition是一個邏輯表達式,它決定了循環是否應該繼續執行。只要condition的值為True,循環就會一直重複執行,直到condition的值變為False為止。下面是一個示例,演示瞭如何使用While循環來打印數字序列,直到達到指定的最大值為止:
Sub ExampleWhileLoop()
Dim i As Integer
Dim maxNumber As Integer
i = 1
maxNumber = 10
While i <= maxNumber
Debug.Print i
i = i + 1
Wend
End Sub
在上面的示例中,i變量表示當前要打印的數字,maxNumber變量表示打印的最大值。循環從i等於1開始,並在每次循環中打印當前的i值,然後將i增加1。循環會一直執行,直到i的值大於maxNumber。當i等於10時,循環將終止,程序結束。
END1和END2都是用於數控宏程序WHILE語句。
當一個數控程序中有多個WHILE語句時,第一個WHILE語句格式如下:
WHILE[……]DO1
……
END1
第二個WHILE語句格式如下:
WHILE[……]DO2
……
END2
可以看出,END1對應DO1,END2對應DO2。