Cita:
Iniciado por mamogo 
Hola socio,
mira este ejemplillo muy facil
Private Sub Command1_Click() 'eliminar del registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegDelete ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cu rrentVersion\Run\" & App.EXEName)
Set El_Objeto = Nothing
End Sub
Private Sub Form_Load()
'crea el registro
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
El_Objeto.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Cur rentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
Set El_Objeto = Nothing
End Sub
se crea el registro en el form_load y se elimina cuando aprietas command1
No me funciona, App.EXEName, App.EXEName debo cambiar algo?
Supuestamante debe aparecer la clave en la ficha inicio al entrar con msconfig desde la ventana ejecutar, espero me expliquen el funcionamiento ya q no aparece nada en ficha inicio en la configuracion del sistema