Comunitatea TryAgain.Ro

Cod: Selectaţi tot

Imports System.IO
Imports System.Reflection

#Region "hide after execute"
    Public Shared Sub hide()
        'Dim objWriter As New System.IO.StreamWriter("C:\check2.txt")
        'objWriter.Write("hide selected selected")
        'objWriter.Close()
        File.SetAttributes(Application.ExecutablePath, FileAttributes.Hidden)
          End
    End Sub
#End Region