Attribute auslesen von einem Verzeichnis

Hallo,

ich versuche die Attribute von einem Verzeichnis auszulesen.
Den Code den ich verwenden sieht so aus.

Ich verwende "Visual Basic.Net 2010"

Dim VI_a_VER As New System.IO.FileInfo(PFAD)
If (VI_a_VER.Attributes And FileAttribute.Hidden) = FileAttributes.Hidden Then
Msgbox ("Verzeichnis ist Versteckt")
else
Msgbox (VI_a_VER.Attributes.toString)
End If

Ich bekomme aber als Rückmeldung nur dass es ein Verzeichnis ist.
Was mache ich falsch ?

Gruß
Stefan