前のトピック: FindFirstFile - ディレクトリ内のファイル検索次のトピック: FindNextFile - FindFirstFile ディレクトリ スキャンの続行


FindNext

NetWare、Symbian OS、UNIX、Windows、および Windows CE で有効です。

FindNext 関数では、ディレクトリ スキャンが続行されるため、FindFirst で指定した基準に一致する後続のファイルを抽出するためにこの関数を使用できます。 FindNext では、ディレクトリ内の一致するファイルが検出されなくなるまで、FindNext の呼び出しごとに 1 つのファイル名が返されます。

ファイルの内容に関するこの関数の形式は、以下のとおりです。

FindNext() as string

FindNext の呼び出しごとに、1 つのファイル名が返されます。 ディレクトリ内の一致するファイルが検出されなくなると、空の文字列("")が返されます。

例: FindNext 関数

この例では、C: ドライブのルート ディレクトリにある .bat 拡張子を持つすべてのファイルが検出されてリストされます。

Dim Filename as string

Filename=FindFirst("C:¥*.BAT",FA_ANYFILE)
while Filename<>""
	 print Filename
	 Filename=FindNext()
wend