Dir関数について(\の有無について)

Question

Dドライブ(起動ディスクではありません)の直下に
「1.txt」「2.txt」「3.txt」の3つのテキストファイル及び「AAA」フォルダがあり、
「AAA」フォルダの中に「4.txt」「5.txt」の2つのテキストファイルがあります。

Excelの標準モジュールに、

Sub その1()

Dim str1 as string
str1 = Dir("D:")

Do Until str1 = ""

    Debug.Print str1
    
    str1 = Dir()
    
Loop

End Sub
'---------------------------------------------
Sub その2()

Dim str1 as string
str1 = Dir("D:\")

Do Until str1 = ""

    Debug.Print str1
    
    str1 = Dir()

Loop

End Sub
'---------------------------------------------
Sub その3()

Dim str1 as string
str1 = Dir("D:\AAA")

Do Until str1 = ""

    Debug.Print str1
    
    str1 = Dir()

Loop

End Sub
'---------------------------------------------
Sub その4()

Dim str1 as string
str1 = Dir("D:\AAA\")

Do Until str1 = ""
  
    Debug.Print str1
    
    str1 = Dir()

Loop

End Sub

として違いを見てみると、

「その1」と「その2」では全く違いがありませんでした。
「1.txt」「2.txt」「3.txt」3つのファイル名が表示されます。

しかし、「その3」と「その4」では違いがあります。

「その3」ではファイル名が1つも表示されないのに対して、
「その4」では「4.txt」「5.txt」2つのファイル名が表示されます。

質問

Dir関数の引数に指定する、「\」はどういう意味があるのですか？

「その1」と「その2」での比較と「その3」と「その4」での比較で
同じような違いがみられないのは何故でしょうか？
(ひょっとすると、ドライブの直下、というのが何か関係しているのでしょうか？)

なお、ソーテック社の「ACCESS関数サンプル活用辞典」のP208には

Dir("C:") →Cドライブ内の標準ファイルを探す
Dir("C:") →Cドライブのルートディレクトリを探す

とあるのですが、この説明の違いも分かりません。Dir関数は
サブフォルダ内は検索しないと思いますし。。。

よろしくお願いします。

Answer 1

Dir("C:") →Cドライブのカレントディレクトリ内を探す
ですね

\は、ディレクトリの区切り記号として使われます
D:\AAA は、DドライブのルートディレクトリにあるAAAファイル
D:\AAA\ は、DドライブのルートディレクトリにあるAAAディレクトリ
という意味合いになろうかと思います

ディレクトリを操作する、という前提で、
D:\AAA は、DドライブのルートディレクトリにあるAAAディレクトリ、という解釈もすることもありますが。

Comments

[u_zu]

y-waiwaiさん　ありがとうございます。

>Dir("C:") →Cドライブのカレントディレクトリ内を探すですね

今、

Debug.Print CurDir("d")

を Sub その1 に挿入してみてもう一度動かしたら、
そのようになりました…(先ほどと動作が違うのですが。。。何故？)

>D:\AAA は、DドライブのルートディレクトリにあるAAAファイル
>D:\AAA\ は、DドライブのルートディレクトリにあるAAAディレクトリ

上段は、"AAA"の後ろに「\」がないから、ディレクトリ(フォルダ)と
みなされずに、ファイルと認識されてしまう、という理解でよろしい
のでしょうか。。。？

[y_waiwai]

> 上段は、"AAA"の後ろに「\」がないから、ディレクトリ(フォルダ)とみなされずに、ファイルと認識されてしまう

それでいいです。
カレントディレクトリは、いろんな操作により変わる（変えられる）ものです

[u_zu]

y_waiwaiさん　ありがとうございます！

Answer 2

Dir("C:")・・・Cドライブのカレントディレクトリの中を見る。
Dir("C:\")・・・Cドライブのルートディレクトリ(ドライブ直下のこと)の中を見る。
Dir("D:\AAA")・・・Dドライブ直下のAAAというファイル（またはディレクトリ）を見る。
Dir("D:\AAA\")・・・Dドライブ直下のAAAというディレクトリの中を見る。

「その3」で何も表示されなかったのは、Dirの第二引数を省略したので一般ファイルだけが対象となったからです。第二引数を適切に指定するとAAAというディレクトリ名が表示されます。

Comments

[otn]

その1，2，4ではファイル名部分が空なので、* が仮定されるようです。
それぞれ、C:* C:* D:\AAA* と同じ。

[u_zu]

otnさん　ありがとうございます。

今、

str1 = Dir("Y:\aaa", vbDirectory)

でテストしたら、ディレクトリ名が表示されました。

テスト1とテスト2が同じ結果というのも
カレントディレクトリがDドライブの直下であることを
確認しました。
CurDir("D")が[D:]となっていました。