Visual Basic 6 - proprietà nascosto applicata ad un file

E' possibile applicareda codice la proprietà "nascosto" ad un file ?
Se è posiibile dove la inserisco nel codice seguente ?
'
Private Sub Form_Load()
Open "C:\Windows\Nasosto.txt" For Append As #1
Close #1
End Sub

Ciao,
puoi usare l'istruzione del vb6 SetAttr