VB.NET :: Cara Membuat startup dengan Vb.Net

Imports Microsoft.Win32
Berikut adalah sintaks untuk mengaktifkan program kita pada saat start up.

Dim AppName, AppPath As String
AppName = Application.ProductName'Nama aplikasi
AppPath = Application.StartupPath'Alamat (Path) aplikasi

Dim oReg As RegistryKey = Registry.CurrentUser
oReg=Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
oReg.SetValue(AppName, AppPath & "\" & AppName + ".exe")
oReg.Close()

Sedangkan untuk menonaktifkan adalah seperti sintaks dibawah ini

Dim oReg As RegistryKey = Registry.CurrentUser
oReg = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
oReg.DeleteValue(AppName)
oreg.Close()

Sedangkan untuk mengecek value startup pada registry apakah ada atau tidak adalah seperti dibawah ini

Dim AppName, AppPath As String
AppName = Application.ProductName
AppPath = Application.StartupPath

Dim oReg As RegistryKey = Registry.CurrentUser
oReg = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
If oReg.GetValue(AppName) Is Nothing Then
MenuItem6.Checked = False
Else
MenuItem6.Checked = True
End If

Untuk mengecek program kita sudah benar-benar akan aktif pada saat windows start up, bisa dilihat di Run>msconfig
Pada tab Startup, nama program dan path akan terlihat disana.

Note : Sintaks diatas merupakan untuk Current User, jika untuk seluruh user tinggal ubah Registry.CurrentUser menjadi Registry.LocalMachine

Source