TOOLBAR
Boa tarde, eu tenho uma toolbarcom 3 botoes e gostaria de saber como eu faço para executar alguma tarefa quando for clicado os botões, tipo seria como o código abaixo ? Ou esta errado ?
Select case toolbar1.index
case 1
comandos 1
case 2
comandos 2
case 3
comandos 3
end select
Obrigado.
Select case toolbar1.index
case 1
comandos 1
case 2
comandos 2
case 3
comandos 3
end select
Obrigado.
no evento button_click ele passa a informação:
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
case 1
'comandos
case 2
'comandos
case else
'comandos
end select
end sub
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
case 1
'comandos
case 2
'comandos
case else
'comandos
end select
end sub
Tópico encerrado , respostas não são mais permitidas