VBS基礎篇 - 循環語句(4) - For Each...Next

For Each...Next 循環與 For...Next 循環類似。For Each...Next 不是將語句運行指定的次數，而是對於數組中的每個元素或對象集合中的每一項重復一組語句。這在不知道集合中元素的數目時非常有用。

語法結構如下：        　　

For Each element In group
    [statements]
    [Exit For]
    [statements]
Next [element]

主要參數：

element：用來枚舉集合或數組中所有元素的變量。對於集合，element可能是Variant變量、通用Object變量或任意指定的Automation對象變量。對於數組，element只能是Variant變量。

group：對象集合或數組的名稱。

       具體實例代碼如下:

Dim Dics '定義一個變量
Set Dics = CreateObject("Scripting.Dictionary") '定義一個Dictionary對象
Dics.Add "0", "Athens"   '為Dictionary對象賦值
Dics.Add "1", "Belgrade"
Dics.Add "2", "Cairo"
For Each Dic in Dics
    MsgBox Dics.Item(Dic) '循環遍歷，且輸出Dictionary鍵值
Next