VBSのFor文

質問

VBSのドキュメントをダウンロードし、その中にFor文のサンプルがあったんですが、この構文の"f1"はどういった役割をしているのでしょうか？教えてください。

Dim fso, f, fc, f1,s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("c:\work")
Set fc = f.files

For Each f1 in fc
s = f1.name
Next

回答No.1

bdr · ベストアンサー

ソースにコメントをつけました

'ファイルシステムオブジェクトを作成
Set fso = CreateObject("Scripting.FileSystemObject")

'"c:\work"をオブジェクトとして格納
Set f = fso.GetFolder("c:\work")

'"c:\work"にファイル群を格納
Set fc = f.files

'ファイル群(fc)の各々のファイルごと(f1)に繰返し
For Each f1 in fc
'ファイル名を格納
s = f1.name
'次のファイルへ
Next

コメントを参考にしてください
fcは複数のファイルで、f1は個々のファイルという意味です

お礼

ありがとうございます。
とても分かりやすく、理解することが出来ました。

回答No.2

BLUEPIXY

For Each 変数 in コレクション
のような場合は、
変数にコレクションのそれぞれの内容がループのたびにセットされます