• VBScript
  • VBScript 用戶手冊
    • 什么是 VBScript？
    • 在 HTML 頁面中添加 VBScript 代碼
    • VBScript基礎(chǔ)
      • VBScript 數(shù)據(jù)類型
      • VBScript 變量
      • VBScript 常數(shù)
      • VBScript 運算符
      • 使用條件語句
      • 使用循環(huán)語句
      • VBScript 過程
      • VBScript 編碼約定
    • Internet Explorer 中的 VBScript
      • VBScript 頁面的簡單樣例
      • VBScript 與窗體
      • 在 VBScript 中使用對象
  • 語言參考
    • VBScript 特性
    • 未包含在 Visual Basic for Applications 中的 VBScript 特性
    • 未包含在 VBScript 中的 Visual Basic for Applications 特性
    • VBScript 常數(shù)
      • 顏色常數(shù)
      • 比較常數(shù)
      • 日期和時間常數(shù)
      • 日期格式常數(shù)
      • 其他常數(shù)
      • MsgBox 常數(shù)
      • 字符串常數(shù)
      • 三態(tài)常數(shù)
      • VarType 常數(shù)
      • VBScript 常數(shù)
    • VBScript 錯誤
      • VBScript 運行時錯誤
      • VBScript 語法錯誤
    • VBScript 事件
      • Initialize 事件
      • Terminate 事件
    • VBScript 函數(shù)
      • Abs 函數(shù)
      • Array 函數(shù)
      • Asc 函數(shù)
      • Atn 函數(shù)
      • CBool 函數(shù)
      • CByte 函數(shù)
      • CCur 函數(shù)
      • CDate 函數(shù)
      • CDbl 函數(shù)
      • Chr 函數(shù)
      • CInt 函數(shù)
      • CLng 函數(shù)
      • 轉(zhuǎn)換函數(shù)
      • Cos 函數(shù)
      • CreateObject 函數(shù)
      • CSng 函數(shù)
      • CStr 函數(shù)
      • Date 函數(shù)
      • DateAdd 函數(shù)
      • DateDiff 函數(shù)
      • DatePart 函數(shù)
      • DateSerial 函數(shù)
      • DateValue 函數(shù)
      • Day 函數(shù)
      • 派生數(shù)學(xué)函數(shù)
      • Eval 函數(shù)
      • Exp 函數(shù)
      • Filter 函數(shù)
      • FormatCurrency 函數(shù)
      • FormatDateTime 函數(shù)
      • FormatNumber 函數(shù)
      • FormatPercent 函數(shù)
      • GetLocale 函數(shù)
      • GetObject 函數(shù)
      • GetRef 函數(shù)
      • Hex 函數(shù)
      • Hour 函數(shù)
      • InputBox 函數(shù)
      • InStr 函數(shù)
      • InStrRev 函數(shù)
      • Int、Fix 函數(shù)
      • IsArray 函數(shù)
      • IsDate 函數(shù)
      • IsEmpty 函數(shù)
      • IsNull 函數(shù)
      • IsNumeric 函數(shù)
      • IsObject 函數(shù)
      • Join 函數(shù)
      • LBound 函數(shù)
      • LCase 函數(shù)
      • Left 函數(shù)
      • Len 函數(shù)
      • LoadPicture 函數(shù)
      • Log 函數(shù)
      • LTrim、RTrim 和 Trim 函數(shù)
      • 數(shù)學(xué)函數(shù)
      • Mid 函數(shù)
      • Minute 函數(shù)
      • Month 函數(shù)
      • MonthName 函數(shù)
      • MsgBox 函數(shù)
      • Now 函數(shù)
      • Oct 函數(shù)
      • Replace 函數(shù)
      • RGB 函數(shù)
      • Right 函數(shù)
      • Rnd 函數(shù)
      • Round 函數(shù)
      • ScriptEngine 函數(shù)
      • Microsoft(R) Visual Basic(R) Scripting Edition
      • ScriptEngineMajorVersion 函數(shù)
      • ScriptEngineMinorVersion 函數(shù)
      • Second 函數(shù)
      • SetLocale 函數(shù)
      • Sgn 函數(shù)
      • Sin 函數(shù)
      • Space 函數(shù)
      • Split 函數(shù)
      • Sqr 函數(shù)
      • StrComp 函數(shù)
      • String 函數(shù)
      • StrReverse 函數(shù)
      • Tan 函數(shù)
      • Time 函數(shù)
      • Timer 函數(shù)
      • TimeSerial 函數(shù)
      • TimeValue 函數(shù)
      • TypeName 函數(shù)
      • UBound 函數(shù)
      • UCase 函數(shù)
      • VarType 函數(shù)
      • Weekday 函數(shù)
      • WeekDayName 函數(shù)
      • Year 函數(shù)
    • VBScript 關(guān)鍵字
      • Empty
      • False
      • Nothing
      • Null
      • True
    • VBScript 方法
      • Clear 方法
      • Execute 方法
      • Raise 方法
      • Replace 方法
      • Test 方法
    • • 字符集 (0 - 127)
      • 字符集 (128 - 255)
      • 區(qū)域設(shè)置 ID (LCID) 表
    • VBScript 對象
      • Class 對象
      • Err 對象
      • Match 對象
      • Matches 集合
      • 正則表達式(RegExp)對象
    • VBScript 運算符
      • 運算符(+)
      • And 運算符
      • 算術(shù)運算符
      • 賦值運算符
      • 賦值運算符 (=)
      • 比較運算符
      • 連接運算符 (&)
      • 連接運算符
      • 除運算符 (/)
      • Eqv 運算符
      • 冪運算符 (^)
      • Imp 運算符
      • \ 運算符
      • Is 運算符
      • 邏輯運算符
      • Mod 運算符
      • 乘運算符 (*)
      • Not 運算符
      • 運算符優(yōu)先級
      • 運算符概述
      • Or 運算符
      • 減運算符 (-)
      • Xor 運算符
    • VBScript 屬性
      • Description 屬性
      • FirstIndex 屬性
      • Global 屬性
      • HelpContext 屬性
      • HelpFile 屬性
      • IgnoreCase 屬性
      • Length 屬性
      • Number 屬性
      • Pattern 屬性
      • Source 屬性
      • Value 屬性
    • VBScript 語句
      • Call 語句
      • Class 語句
      • Const 語句
      • Dim 語句
      • Do...Loop 語句
      • Erase 語句
      • Execute 語句
      • ExecuteGlobal 語句
      • Exit 語句
      • For Each...Next 語句
      • For...Next 語句
      • Function 語句
      • If...Then...Else 語句
      • On Error 語句
      • Option Explicit 語句
      • Private 語句
      • Property Get 語句
      • Property Let 語句
      • Property Set 語句
      • Public 語句
      • Randomize 語句
      • ReDim 語句
      • Rem 語句
      • Select Case 語句
      • Set 語句
      • Sub 語句
      • While...Wend 語句
      • With 語句
  • FileSystemObject 用戶指南
    • FileSystemObject 對象模型
    • FileSystemObject 和 Scripting 運行時庫參考的介紹
    • FileSystemObject 對象
    • 設(shè)計 FileSystemObject
    • 處理驅(qū)動器和文件夾
    • 處理文件
    • FileSystemObject 示例代碼
  • Scripting 運行時庫參考
    • Microsoft Scripting 運行時庫特性
    • • DriveType 常數(shù)
      • 文件屬性常數(shù)
      • 文件輸入/輸出常數(shù)
      • FileSystemObject 常數(shù)
      • SpecialFolder 常數(shù)
    • • Add 方法(Dictionary)
      • AddFolders 方法(Folders)
      • BuildPath 方法
      • Close 方法
      • Copy 方法
      • CopyFile 方法
      • CopyFolder 方法
      • CreateFolder 方法
      • CreateTextFile 方法
      • Delete 方法
      • DeleteFile 方法
      • DeleteFolder 方法
      • DriveExists 方法
      • Exists 方法
      • FileExists 方法
      • FolderExists 方法
      • GetAbsolutePathName 方法
      • GetBaseName 方法
      • GetDrive 方法
      • GetDriveName 方法
      • GetExtensionName 方法
      • GetFile 方法
      • GetFileName 方法
      • GetFolder 方法
      • GetParentFolderName 方法
      • GetSpecialFolder 方法
      • GetTempName 方法
      • Items 方法
      • Keys 方法
      • Move 方法
      • MoveFile 方法
      • MoveFolder 方法
      • OpenAsTextStream 方法
      • OpenTextFile 方法
      • Read 方法
      • ReadAll 方法
      • ReadLine 方法
      • Remove 方法
      • Skip 方法
      • SkipLine 方法
      • Write 方法
      • WriteBlankLines 方法
      • WriteLine 方法
    • • Dictionary 對象
      • Drive 對象
      • Drives 集合
      • File 對象
      • Files 集合
      • FileSystemObject 對象
      • Folder 對象
      • Folders 集合
    • • AtEndOfLine 屬性
      • AtEndOfStream 屬性
      • Attributes 屬性
      • AvailableSpace 屬性
      • Column 屬性
      • CompareMode 屬性
      • Count 屬性
      • DateCreated 屬性
      • DateLastAccessed 屬性
      • DateLastModified 屬性
      • Drive 屬性
      • DriveLetter 屬性
      • Drives 屬性
      • DriveType 屬性
      • Files 屬性
      • FileSystem 屬性
      • FreeSpace 屬性
      • IsReady 屬性
      • IsRootFolder 屬性
      • Item 屬性
      • Key 屬性
      • Line 屬性
      • Name 屬性
      • ParentFolder 屬性
      • Path 屬性
      • RootFolder 屬性
      • SerialNumber 屬性
      • ShareName 屬性
      • ShortName 屬性
      • ShortPath 屬性
      • Size 屬性
      • SubFolders 屬性
      • TotalSize 屬性
      • Type 屬性
      • VolumeName 屬性
  • 正則表達式簡介
    • 正則表達式
    • 早期起源
    • 使用正則表達式
    • 正則表達式語法
    • 建立正則表達式
    • 優(yōu)先權(quán)順序
    • 普通字符
    • 特殊字符
    • 非打印字符
    • 字符匹配
    • 限定符
    • 定位符
    • 選擇和編組
    • 后向引用

For Each...Next 語句

對數(shù)組或集合中的每個元素重復(fù)執(zhí)行一組語句。

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

參數(shù)

element

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

group

對象集合或數(shù)組的名稱。

statements

對于 group 中的每一項執(zhí)行的一條或多條語句。

說明

如果 group 中有至少一個元素，就會進入 For Each 塊執(zhí)行。一旦進入循環(huán)，便首先對 group 中第一個元素執(zhí)行循環(huán)中的所有語句。只要 group 中還有其他的元素，就會對每個元素執(zhí)行循環(huán)中的語句。當 group 中的沒有其他元素時退出循環(huán)，然后從 Next 語句之后的語句繼續(xù)執(zhí)行。

Exit For 只能用于 For Each...Next 或 For...Next 控制結(jié)構(gòu)中，提供另一種退出循環(huán)的方法�？稍谘�環(huán)的任意位置放置任意個 Exit For 語句。Exit For 經(jīng)常和條件判斷語句一起使用（例如 If...Then），并立即將控制權(quán)轉(zhuǎn)移到 Next 之后的語句。

可以將一個 For Each...Next 循環(huán)放置在另一個之中，組成嵌套式 For Each...Next 循環(huán)。但是每個循環(huán)的 element 必須是唯一的。

注意 如果省略 Next 語句中的 element，則程序仍會象已包含它一樣繼續(xù)執(zhí)行。如果 Next 語句在其相應(yīng)的 For 語句之前出現(xiàn)，則會產(chǎn)生錯誤。

下面例子舉例說明如何使用 For Each...Next 語句:

Function ShowFolderList(folderspec)
Dim fso, f, f1, fc, s
Set fso =CreateObject("Scripting.FileSystemObject")
Set f =fso.GetFolder(folderspec)
Set fc =f.Files
For Each f1 in fc
s =s & f1.name
s =s & "<BR>"
Next
ShowFolderList =s
End Function

要求

版本 2

請參閱

Do...Loop 語句 | Exit 語句 | For...Next 語句 | While...Wend 語句