Dir関数

フォルダの絶対パスを引数で渡して、そのフォルダの中身をDir関数で検索。
そのフォルダの中にフォルダがあれば、またそのフォルダの絶対パスを引数に渡して…
再帰的に繰り返すことでフォルダ内をサーチしようとしたところ…
できませんでした。
呼び出し先の関数でDir関数を使ってしまうと、呼び出し元でDir関数を使ってもその続きからファイルを検索してしまいます。
以下にサンプル。

ファンクション1:
MFolder = Dir(ScenarioPath & "*", フォルダ)
ファンクション2
MFolder = Dir()
Return

ファンクション2:
MFolder = Dir(AppPath & "\*", フォルダ)
MFolder = Dir()
Return

間にTalkコマンドを挟むとよくわかります。以上。