HOLA ME PODRIAN AYUDAR A VERIFICAR SI LA SINTAXIS QUE ESTOY UTILIZANDO ESTA CORRECTA YA Q CADA VEZ QUE QUIERO ACTUALIZAR UN DATO INGRESADO ME BOTA UN ERROR LES DEJO EL CODIGO
PUBLIC SUB B3_Click()
IF (T2.Text <> "" AND T3.Text <> "") THEN
rs = cn.Exec("UPDATE CONTACTOS SET (NOM_CONT='" & T2.Text & "',TELF_CONT='" & T3.Text & "',EMA_CONT='" & T4.Text & "',DIR_CONT='" & T5.Text & "',NAC_CONT='" & T6.Text & "')")
Message.Info("Los Datos del Docente han sido Actualizados Correctamente....!!!")
L1.Text = ""
T2.Text = ""
T3.Text = ""
T4.Text = ""
T5.Text = ""
T6.Text = ""
B2.Enabled = FALSE
B1.Enabled = TRUE
T2.SetFocus
ELSE
Message.Error("No ha ingresado los Datos Requeridos....!!!")
T2.SetFocus
END IF
END