Images von Menüeinträgen in ImageList Ein Code-Snippet zum Einspeichern der Imagws aller Menüeinträge eines Programms in eine ImageList
Autor:   Dietrich Herrmann	Bewertung:     [ Jetzt bewerten ]	Views:  3.270
ohne Homepage	System:  Win7, Win8, Win10, Win11	kein Beispielprojekt

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 4 Bewertung insgesamt: sehr gut Durchschnittliche Bewertung: 4.5 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Der Hauptform mit der Menüleiste (MenuStrip) fügt man eine Komponente ImageList zu, bspw. mnuImageList.

Im LoadEvent der Form wendet man dann den folgenden Code an:

' alle Bilder aus den Menüeinträgen in eine ImageList eintragen
mnuImageList.Images.Clear()
Dim menC, misC As ToolStripItemCollection
menC = MenuStrip.Items
For Each mi As ToolStripMenuItem In menC
  misC = mi.DropDownItems
  For i As Short = 0 To misC.Count - 1
    If TypeOf misC.Item(i) Is ToolStripSeparator Then
    Else
      Dim ms As ToolStripMenuItem = misC.Item(i)
      If Not IsNothing(ms.Image) Then
        mnuImageList.Images.Add(ms.Name, ms.Image)
        ' Debug.Print(ms.Name)
      End If
    End If
  Next 
Next 

Danach sind alle Images der Menüeinträge in der ImageList gespeichert für eventuelle spätere Verwendung.