>>249
Dir("")を実行すると一見""が返ってくるように思われるが実際は違う。ファイル名が返ってきてしまう。
Dir("a")など１字以上の文字列を評価するようにしないとだめだ。
だからDir(Path)のPathに""を代入してしまっている個所を修正する。