Programación General > Visual Basic 6.0 e inferiores
Barra De Herramientas
(1/1)
Gabrielon:
:blink: Buenas tardes tengo un sistema al que le puse una barra de herramientas pero de iniccio uno no estan habilitados, dependdiendo de es coger una opcion debo de habilitar ese boton, como le puedo hacer? :(
Angel38:
Hola Gabrielon.
Despues de leer tu mensaje :blink:
No entendí, creo que la solucion es que veas la propiedad enabled de ese boton.
Ejm:
if option1 = true then
command1.enabled=True
else
command1.enabled=False
end if
Si es false lo deshabilita, si true lo habilita.
Suerte.
RadicalEd:
--- Cita de: "Angel38" --- Hola Gabrielon.
Despues de leer tu mensaje :blink:
No entendí, creo que la solucion es que veas la propiedad enabled de ese boton.
Ejm:
if option1 = true then
command1.enabled=True
else
command1.enabled=False
end if
Si es false lo deshabilita, si true lo habilita.
Suerte.
--- Fin de la cita ---
Lamento decir que no es asi viejo Angel38, el control Toolbar no maneja opciones, maneja sus botones por un Index, aqui va un ejemplo:
--- Código: Text ---Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) On Error Resume Next With Toolbar1 Select Case Button.Index Case 1 Call habil .Buttons(2).Enabled = True Case 2 Call habil .Buttons(3).Enabled = True Case 3 Call habil .Buttons(4).Enabled = True Case 4 Call habil .Buttons(5).Enabled = True Case 5 Call habil .Buttons(1).Enabled = True End SelectEnd WithEnd SubSub habil() With Toolbar1 .Buttons(1).Enabled = False .Buttons(2).Enabled = False .Buttons(3).Enabled = False .Buttons(4).Enabled = False .Buttons(5).Enabled = False End WithEnd Sub
Angel38:
Ok.
Se me habia pasado que era un toolbar. :P
Pero no estaba tan perdido :whistling:
Esas pataletas de ahogado :lol:
Navegación
Ir a la versión completa