Public Class Tester
Public Shared Sub Main
Dim fileDetail As IO.FileInfo = My.Computer.FileSystem.GetFileInfo("yourfile.jpg")
fileDetail.IsReadOnly = True
fileDetail.Attributes = fileDetail.Attributes Or IO.FileAttributes.Hidden
End Sub
End Class