hola, mi problema es que no se como hay que hacer para habilitar o deshabilitar un boton en visual basic con enabled (con un command si lo se) pero el problema es que cuando inserto el codigo de un boton cualquiera del toolbar por ejemplo el de insertar un registro pues como podria deshabilitar cualquier boton dentro de ese toobar cuando he pulsado dicho boton. Más o menos así sería el código:
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key
Case "InsertarRegistro"
FormEmpleados.TextCódigo.Enabled = True
FormEmpleados.TextNombre.Enabled = True
FormEmpleados.TextApellidos.Enabled = True
FormEmpleados.TextDNI.Enabled = True
FormEmpleados.TextEdad.Enabled = True
FormEmpleados.TextSexo.Enabled = True
FormEmpleados.TextFechaNacimiento.Enabled = True
FormEmpleados.TextFechaAlta.Enabled = True
FormEmpleados.TextContraseña.Enabled = True
FormEmpleados.TextTeléfono.Enabled = True
FormEmpleados.TextCelular.Enabled = True
FormEmpleados.TextFax.Enabled = True
FormEmpleados.TextDirección.Enabled = True
FormEmpleados.TextLocalidad.Enabled = True
FormEmpleados.TextProvinciaEstado.Enabled = True
FormEmpleados.TextPaís.Enabled = True
FormEmpleados.TextCódigoPostal.Enabled = True
FormEmpleados.TextEmail.Enabled = True
FormEmpleados.TextNotas.Enabled = True
FormEmpleados.TextCódigo = ""
FormEmpleados.TextNombre = ""
FormEmpleados.TextApellidos = ""
FormEmpleados.TextDNI = ""
FormEmpleados.TextEdad = ""
FormEmpleados.TextSexo = ""
FormEmpleados.TextFechaNacimiento = ""
FormEmpleados.TextFechaAlta = ""
FormEmpleados.TextContraseña = ""
FormEmpleados.TextTeléfono = ""
FormEmpleados.TextCelular = ""
FormEmpleados.TextFax = ""
FormEmpleados.TextDirección = ""
FormEmpleados.TextLocalidad = ""
FormEmpleados.TextProvinciaEstado = ""
FormEmpleados.TextPaís = ""
FormEmpleados.TextCódigoPostal = ""
FormEmpleados.TextEmail = ""
FormEmpleados.TextNotas = ""
*/AQUÍ TENDRÍA QUE PONER LA ACCIÓN PARA
DESHABILITAR UN BOTÓN DE DICHO TOOLBAR CUANDO HE PULSADO ESE BOTÓN
CON UN COMMAND SERIA ESTO: command1.enabled=false
End Select
