Public Class Tester
Public Shared Sub Main
Dim fileDetail As IO.FileInfo = My.Computer.FileSystem.GetFileInfo("test.txt")
Console.WriteLine(fileDetail.IsReadOnly)
Console.WriteLine(CBool(fileDetail.Attributes And IO.FileAttributes.Hidden))
End Sub
End Class