Private Sub CheckBox1_Check edChanged(ByVal sender As System.Object, ByVal e As System.EventArg s) Handles CheckBox1.Check edChanged
Dim regKey As New Object
Dim strKeyValueHere As String
Dim strMyExePathAnd Name As String
Const strKeyRootPath As String = "SOFTWARE\Micro soft\Windows\Cu rrentVersion\Ru n\"
Const HKEY_LOCAL_MACH INE As Long = &H80000002
...