Cita: Iniciado por mrocf
Podrías utilizar algo como:
Private Sub TextNombre_Change()
cmdInsertar.Enabled = CBool(Len(TextNombre))
End Sub
Otra rutina, la misma funcion
Cita: Private Sub TextNombre_Change()
'If Len(TextNombre) = 0 Then
' cmdInsertar.Enabled = False
'Else
' cmdInsertar.Enabled = True
'End If
End Sub
Tenia y tengo la ultima.
Si por falta de dar gracias te molestas, no quiero que llegues a eso, presionaré todos los botones que se destinen a tal fin
Gracias
Gracias