یه کمک کوچیک FileAttributes در VB.NET

بابا دیگه دق کردم یکی کمک کنه منو نجات بده

Imports System.IO
Public Class mainFrm

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myfile As String = ("c:\Downloads\1.txt")
File.SetAttributes(myfile, FileAttributes.Hidden)
File.SetAttributes(myfile, FileAttributes.System)
File.SetAttributes(myfile, FileAttributes.ReadOnly)
End Sub

End Class

فایل رو اول hidden میکنه بعد از hidden در میاره system میکنه بعد از system در میاره readonly میکنه
یعنی در کل فقط ReadOnly میشه
حالا اگه این سوال رو یکی برسونه سوال بعدی رو قول میدم خودم حل کنم
لطفا

سلام.
برای اینکه هر سه تا خاصیت رو به فایل بدی از کد زیر استفاده کن:

کد:

---

        System.IO.File.SetAttributes("C:\a.txt", IO.FileAttributes.Hidden + IO.FileAttributes.System + IO.FileAttributes.ReadOnly)

---

موفق باشید.