[alex]

Μιιχάλη Καλημέρα!!!!!

Για να εισαχθεί όπως γράφεις μενού στην φόρμα χρειάζονται 2 στοιχεία ελέγχου ένα να εμφανίζει το μενού και ένα να αλλάζει τις εικόνες.
Το παιγνίδι όλο παίζει και στα 2 στοιχεία ελέγχου απο την ιδιότητα προσαρμοσμένο.Παίξε λίγο με αυτά.
Για να δώσεις εντολή θέλει νομίζω ότι κάπως έτσι θα βάλεις τον κώδικα ΠΧ.

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)

Debug.Print Button.Index

End Sub

ή

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)

If Button.Index = 1 Then

MsgBox "Thanks for using my program"

Unload Me

End

End If

End Sub

Μέσα από τις ιδιότητες κάθε κουμπί έχει index αριθμό βάση αυτού θα γράψεις κώδικα ανάλογα σε τι αναφέρεται το κάθε κουμπί.

Καλή συνέχεια

Φιλικά/Αλέξανδρος