Postada em 11/10/2010 10:16 hs
Amigos,
Criei uma toolbar e alguns botões droopdown. Para estes botões, o código abaixo está correto?
Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
Select Case ButtonMenu.Key
Case "opt1"
MsgBox "Opção 1"
Case "opt2"
MsgBox "Opção 2"
End Select
End Sub
|
