[vb6]pulsanti in toolbar

[postmaster1]

Alla fine ho optato per la toolbar pero' non avendo mai usato questo controllo mi si pone un problema...e sul mio libro su vb6 non ne parla proprio...


praticamente ho creato la toolbar e poi ho aggiuntoun imagelist per assegnarli le icone per ogni pulsate..e fin qui tutto bene...pero' come faccio a scrivere il codice pe ogni singolo pulsante? visto che se clicco sul pulsante interessato mi prende tutta la toobar...

mi ci sto esaurendo....come sempre grazie mille a tutti

[Last_Winter]

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key
Case "Apri" 'key dei pulsanti
Apri
Case "Salva"
Salva
Case "Stampa"
Stampa
End Select
End Sub

Claro?

[LMondi]

Ciao postmaster1.
Poniamo che vuoi uscire dal programma e clicchi sull'Icona Exit:

Public Sub tbToolBar_ButtonClick(ByVal Button As MSComctlLib.Button)
        On Error Resume Next
                
    Select Case Button.Key
        Case "Exit"
            Call frmMain.mnuFileExit_Click   
... ... ...    
    End Select
End Sub

In questo modo con Call vai alla routine inserita nel menù Esci.
Naturalmente avrai inserito nel pulsante (Icona corrispondente) Index 1 la Key Exit (Clic sulla Barra delle icone > Proprietà.
Ciao !

[postmaster1]

clarissimo...l'ho appena provato!

grazie last

[postmaster1]

scusa non avevo letto...grazie anche a te LMondi...

come sempre tutti molto gentili