Highlights
All Snippets
Top 100 Snippets
Librarians
gbCodeLib

By Language
VB6
JavaScript
Perl
HTML
SQL
Java
DOS

GBIC >> Source Code >> Visual Basic >> Snippet

Toolbar - responding to menu selection


Private Sub  Toolbar1_ButtonMenuClick( ByVal ButtonMenu As MSComctlLib.ButtonMenu)

If ButtonMenu.Parent.Key = "game" Then
    'Do something
End If

If ButtonMenu.Parent.Key = "speed" Then
    'Do something else
End If

End Sub