Türkiye'de ilk Mobil & PC Aynı Anda Metin2 Oyna. Triarchonline kalıcı ve uzun ömürlü yapısı ile 24 Temmuz'da açılıyor. | 1-99 Mobil Metin2 Triarch HEMEN TIKLA!
Bu derste VB.net ile formunuzu Windows'un başlangıcında çalıştırılmasını sağlamak üzere bir çalışma yapacağız.
Video Görkem Arı'ya aittir.
1 Checkbox
Video Görkem Arı'ya aittir.
1 Checkbox
Kod:
Imports Microsoft.Win32
Public Class Form1
Private Sub addcurrentkey(ByVal name As String, ByVal path As String)
Dim key As RegistryKey = Registry.CurrentUser.OpenSubKey("SoftwareMicrosoftWindowsCurrentVersionRun", True)
key.SetValue(name, path)
End Sub
Private Sub removecurrentkey(ByVal name As String)
Dim key As RegistryKey = Registry.CurrentUser.OpenSubKey("SoftwareMicrosoftWindowsCurrentVersionRun", True)
key.DeleteValue(name, False)
End Sub
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked = True Then
addcurrentkey("programadi", System.Reflection.Assembly.GetEntryAssembly.Locati on)
Else
removecurrentkey("programadi")
End If
End Sub
End Class
