Intento
Submarino privado Command0_Click ()
DB dévil como base de datos
Fijar DB = CurrentDb
En el error Err_Here indicado
DoCmd.SetWarnings falso
CurrentDb.Execute SQL
el mySQL = “ALTERA LA TABLA [empleados que han emparejado al mercado] AGREGA [enchufe o el fósforo] varchar (5)”
DB. Ejecutar el mySQL
el mySQL = “ACTUALIZACIÓN [empleados que han emparejado al mercado] FIJÓ [enchufe o el fósforo] = emparejado "" el """
MsgBox “bandera se aplicó”
DoCmd.SetWarnings verdad
DB. Ejecutar el mySQL
Salir el submarino
Err_Here:
MsgBox “XYZ”
Submarino del extremo