1 2 | '設定多個屬性,可使用以下方式 fileInfo.Attributes = FileAttributes.Hidden | FileAttributes.ReadOnly; |
1 2 3 4 | ' 隱藏檔案 Dim strFileName As String = "C:\test.txt" Dim fileInfo As New FileInfo(strFileName) fileInfo.Attributes = FileAttributes.Hidden |
1 2 3 4 | '隱藏資料夾 Dim strDirName As String = "C:\test" Dim diMyDir As New DirectoryInfo(strDirName) diMyDir.Attributes = FileAttributes.Hidden |
沒有留言:
張貼留言