Hola buenas noches tengo un error al compilar el programa cuando cargar el formulario quiero que cambie parte del registro de windows en este caso la salida de audio
Código:
  1. Private Sub Form_Load()
  2. Dim WshShell As Object
  3. Set WshShell = CreateObject("WScript.Shell")
  4. wshell.regwrite "HKCU\software\realtek\mixer\Playback", "Realtek HD Audio 2nd output", "REG_SZ" (esta linea me tira el error)
  5. End Sub

ese linea me dice que walta un objeto igual que al cerrar el formulario ocurra esto
Código:
  1. Private Sub Form_Unload(Cancel As Integer)
  2. Dim WshShell As Object
  3. Set WshShell = CreateObject("WScript.Shell")
  4. wshell.regwrite "HKCU\software\realtek\mixer\Playback", "Realtek HD Audio output", "REG_SZ"
  5. End Sub

si me pueden ayudar les agradeceria mucho