Παρακάτω παραθέτω μία μέθοδο η οποία εάν εκτελεστεί μία φορά μέσα από την εφαρμογή τότε η εφαρμογή ουσιαστικά γίνεται autoRun όταν ξεκινάμε τά Windows
Αρχικά στά Reference πρέπει να δηλώσουμε το Microsoft.VisualBasic.Compatibility
Imports
Microsoft.Win32
Module
AutoRun
Public Sub AddInRun()
Dim Value As String
Dim RegKey As RegistryKey = Registry.LocalMachine.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Run")
Value = VB6.GetPath & "\" & VB6.GetEXEName() & ".EXE"
RegKey.SetValue("MyApplication", Value)
RegKey.Close()
End Sub
End
Module