方法 : Visual Basic でファイルが隠しファイルかどうかを調べる

更新 : 2007 年 11 月

My.Computer.FileSystem.GetFileInfo メソッドを使用すると、指定されたファイルに関する情報を格納している FileInfo オブジェクトを取得でき、その中に FileAttributes 列挙体が含まれています。

調べるファイルに対応する FileInfo オブジェクトを取得します。この例では、Testfile.txt ファイルに対応する FileInfo を取得します。
```
Dim infoReader As System.IO.FileInfo
infoReader = My.Computer.FileSystem.GetFileInfo("C:\testfile.txt")
```
FileInfo オブジェクトから FileAttributes オブジェクトを取得します。この例では、FileInfo オブジェクトから FileAttributes を取得します。
```
Dim attributeReader As System.IO.FileAttributes
attributeReader = infoReader.Attributes
```
FileAttributes を照会して、ファイルが隠しファイルかどうかを確認します。この例では、ファイルが隠しファイルかどうかを確認し、それに応じた結果を表示します。
```
If (attributeReader And System.IO.FileAttributes.Hidden) > 0 Then
    MsgBox("File is hidden!")
Else
    MsgBox("File is not hidden!")
End If
```

参照