For counter = start To end [Step step] [statements] [Exit For] [statements] Next
當 For Next 循環開始時,Visual Basic Scripting Edition (VBScript) 將 start 賦值給 counter。在運行循環中的語句塊之前,將 counter 與 end 進行比較。如果 counter 已經超過了 end 的值,那么 For 循環終止,控制流程跳躍到 Next 之后的語句。否則運行循環中的語句塊。
每次 VBScript 遇到 Next 的時候,它將 counter 增加 step 并返回到 For。它再次比較 counter 和 end 的值,并根據結果繼續運行循環中的語句塊或者終止循環。這個過程將一直進行下去,直到 counter 超過了 end 或者遇到了 Exit For 語句。
以上為常識,簡單的提一下來湊字數,下面是一個你可能忽略掉的細節:
循環控制變量 start end 和 step 僅僅在循環開始前求值一次,如果你在循環中的語句塊改變 end 或者 step 的值,這個改變不會影響到循環的運行。
寫個簡單的 VBS 腳本驗證一下:
復制代碼 代碼如下:
'Author: Demon 'Date: 2012-1-19 n = 10 s = 1 For i = 1 To n Step s WScript.Echo i n = 5 s = 2 Next WScript.Echo n, s
我們在循環中改變了 n 和 s 的值,但是循環仍然進行了10次,依次輸出1到10,說明 For Next 循環內部保存有循環控制變量 n 和 s 的一份拷貝,并以此內部變量來控制循環的流程。
了解這個細節有助于我們寫出高效簡潔的代碼:
復制代碼 代碼如下:
'Author: Demon 'Date: 2012-1-19 s = "http://VeVB.COm" For i = 1 To Len(s) WScript.Echo Mid(s, i, 1) Next
'這種 C Style 的寫法并不比上面效率更高 '在 VBS 的 For Next 循環中不需要這么做 l = Len(s) For i = 1 To l WScript.Echo Mid(s, i, 1) Next