![\"Auswahl](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_001.png\")
<\/p>\nDie Datenblatt-Ansicht und das Listenfeld sind die bevorzugten Bordmitteln, um Daten in Access in Listenform anzuzeigen. Beide haben Vor- und Nachteile. Doch es gibt auch noch das ListView-Steuerelement, das als ActiveX-Control kommt und mit dem sich viele unterschiedlichen Ansichten realisieren lassen. In diesem Beitrag schauen wir uns an, wie wir Listen mit dem ListView-Steuerelement abbilden können – inklusive Funktionen wie Kontrollkästchen, Icons, Umbenennen und vielen mehr. <\/b><\/p>\n
Listen werden in Access-Anwendungen immer wieder benötigt. Wenn die Daten bearbeitet werden sollen und Spalten angeordnet, vergrößert und verkleinert oder ein- und ausgeblendet werden sollen, ist die Datenblattansicht die beste Wahl.<\/p>\n
Wenn Daten nur zur Auswahl angeboten werden sollen, bietet sich das Listenfeld an. Im Gegensatz zur Datenblattansicht offeriert dieses Steuerelement auch noch die Möglichkeit verschiedener Mehrfachauswahlmodi. Beide haben den großen Vorteil, dass man Datenquellen wie Tabellen oder Abfragen direkt binden kann und dazu kein zusätzlicher Code erforderlich ist.<\/p>\n
Eine weitere Möglichkeit zur Darstellung von Listen ist das in diesem Beitrag vorgestellte ListView<\/b>-Steuerelement. Der Nachteil gleich zu Beginn: Um es mit Daten zu füllen, benötigen wir zwangsläufig VBA-Code.<\/p>\n
Es kann nicht einfach an eine Tabelle oder Abfrage gebunden werden, sondern wir müssen die einzelnen Einträge programmgesteuert hinzufügen.<\/p>\n
Vorteile sind unter anderem die verschiedenen Ansichten, mit denen wir sowohl Daten in tabellarischer Form oder auch Bilder in Matrix-Form darstellen können. Außerdem können wir ein Kontrollkästchen zum einfachen Markieren von Einträgen anzeigen lassen. Und wir können einfachen Listeneinträgen sogar Icons hinzufügen. Nachfolgend schauen wir uns die verschiedenen Techniken zum Anzeigen von Daten in ListView-Steuerelementen an und gehen auch darauf ein, wie wir mit den enthaltenen Einträgen arbeiten können – beispielsweise, um per Doppelklick ein Detailformular zur Bearbeitung anzuzeigen.<\/p>\n
Das Bearbeiten ist nämlich beim ListView<\/b>-Steuerelement nur für die erste Spalte möglich.<\/p>\nAnlegen eines ListView-Steuerelements<\/h2>\n
Um einem Formular ein ListView-Steuerelement hinzuzufügen, öffnen wir das Formular in der Entwurfsansicht und wählen im Ribbon den Befehl Formularentwurf|Steuerelemente|ActiveX-Steuerelemente <\/b>aus (siehe Bild 1).<\/p>\n
<\/p>\n
Bild 1: Auswahl der ActiveX-Steuerelemente<\/span><\/b><\/p>\n Dies blendet den Dialog ActiveX-Steuerelement einfügen <\/b>ein, in dem wir den Eintrag Microsoft ListView Control, version 6.0 <\/b>finden (siehe Bild 2). Nach der Auswahl klicken wir auf OK<\/b>, um das Steuerelement zum Formularentwurf hinzuzufügen.<\/p>\n Bild 2: Auswahl des ListView-Steuerelements<\/span><\/b><\/p>\n Das neue ListView<\/b>-Steuerelement erscheint erst einmal recht unauffällig (siehe Bild 3), weshalb wir erst einmal seine Größe anpassen.<\/p>\n Bild 3: ListView-Steuerelement im Formularentwurf<\/span><\/b><\/p>\n Danach stellen wir seinen Namen ein. Wenn nur ein ListView<\/b>-Steuerelement vorhanden ist, nennen wir es üblicherweise ctlListView<\/b>. Natürlich kann man auch den üblichen Benennungskonventionen folgen und einen Namen wie lvwKunden <\/b>oder lvwProdukte <\/b>wählen.<\/p>\n Zu Beispielzwecken belassen wir es hier bei ctlListView<\/b>.<\/p>\n Das ListView<\/b>-Steuerelement bietet verschiedene Einstellungen für das Erscheinungsbild an. Diese können wir in den Eigenschaften des ListView<\/b>-Steuerelements anpassen oder wir legen diese per VBA fest.<\/p>\n Im Eigenschaftenblatt finden wir die ListView<\/b>-spezifischen Einstellungen auf der Registerseite Andere<\/b> (siehe Bild 4). Diese schauen wir uns in den folgenden Abschnitten im Detail an.<\/p>\n Bild 4: Eigenschaften des ListView-Steuerelements<\/span><\/b><\/p>\n Die nachfolgend vorgestellten Eigenschaften können wir über das Eigenschaftenblatt umstellen oder per VBA. Praktischerweise werden die Eigenschaften des ListView<\/b>-Steuerelements hier in englischer Sprache abgebildet, sodass wir nicht lange nach den VBA-Pendants suchen müssen.<\/p>\n Noch praktischer ist allerdings, dass das ListView<\/b>-Steuerelement einen eigenen Eigenschaften-Dialog anbietet, den wir mit dem Kontextmenü-Eintrag ListViewCtrl-Objekt|Properties <\/b>öffnen (siehe Bild 5).<\/p>\n Bild 5: Anzeigen der Eigenschaften im eigenen Dialog<\/span><\/b><\/p>\n Dieser zeigt die Eigenschaften wie in Bild 6 an. Im Gegensatz zum herkömmlichen Eigenschaftenblatt sehen wir hier auch gleich die Bezeichnungen der Eigenschaftswerte und nicht nur die entsprechenden Zahlenwerte.<\/p>\n Bild 6: Eigener Eigenschaftendialog<\/span><\/b><\/p>\n Im Reiter General <\/b>sehen wir zunächst einige Auswahlfelder für die folgenden Eigenschaften:<\/p>\n Die Mehrzahl der Entwickler stellt die Eigenschaften von Formularen und Steuerelementen über das Eigenschaftenblatt ein. Beim ListView<\/b>-Steuerelement ist das jedoch etwas unkomfortable, da man hier immer wieder den Eigenschaften-Dialog über das Kontextmenü öffnen muss, statt direkt darauf zuzugreifen wie bei den eingebauten Steuerelementen.<\/p>\n Außerdem haben wir festgestellt, dass wir immer wieder ein festes Set von Eigenschaftswerten für den Einsatz von ListView<\/b>-Steuerelementen nutzen.<\/p>\n Außerdem muss man ohnehin eine Prozedur schreiben, die beispielsweise beim Laden des Formulars das ListView<\/b>-Steuerelement mit Daten füllt. Dann kann man auch gleich die Eigenschaften einstellen. Deshalb erledigen wir dies in diesem Beitrag ebenfalls per VBA.<\/p>\n Bei eingebauten Access-Steuerelementen greifen wir in VBA am einfachsten über den Verweis auf das Klassenmodul und den Steuerelementnamen auf das jeweilige Steuerelement zu, zum Beispiel mit Me.txtBeispiel<\/b>. Das gelingt auch mit dem ListView<\/b>-Steuerelement. Allerdings erhalten wir dann nur die Standardeigenschaften von Steuerelementen und können nicht per IntelliSense auf die spezifischen Eigenschaften des ListView<\/b>-Steuerelements zugreifen. Um das zu ermöglichen, benötigen wir eine Objektvariable, die wir beispielsweise wie folgt deklarieren:<\/p>\n Danach weisen wir dieser nicht etwa Me.ctlListView <\/b>als Wert zu, sondern Me.ctlListView.Object<\/b>:<\/p>\n Damit können wir nun Intellisense für die Variable objListView nutzen (siehe Bild 7).<\/p>\n Bild 7: Eigenschaften des ListView-Steuerelements per IntelliSense<\/span><\/b><\/p>\n Die einfachste Aufgabe ist es, ein ListView<\/b>-Steuerelement mit einer einzigen Zeile mit Daten zu füllen. Dazu nutzen wir das Listenfeld aus dem Formular frmListView_Einspaltig<\/b>.<\/p>\n Mit der folgenden Prozedur nehmen wir zunächst einige Standardeinstellungen vor, durch die das Steuerelement optisch ansprechend dargestellt wird (BorderStyle <\/b>und Appearance<\/b>). Außerdem legen wir die View <\/b>auf lvwList <\/b>fest für die einspaltige Listenansicht.<\/p>\n Danach füllen wir das ListView<\/b>-Steuerelement mit drei Einträgen. Dazu nutzen wir die Methode Add <\/b>der ListItems<\/b>-Auflistung:<\/p>\n Die Add<\/b>-Methode erwartet die folgenden Parameter:<\/p>\n Geben wir also nun nur Werte für die Parameter Key <\/b>und Text <\/b>an, erhalten wir die Ansicht aus Bild 8. Damit sich das ListView<\/b>-Steuerelement vom Hintergrund abhebt, haben wir die Eigenschaft Rahmenart <\/b>auf Durchgezogen eingestellt.<\/p>\n Bild 8: ListView-Steuerelement mit einspaltiger Ansicht<\/span><\/b><\/p>\n Mehrspaltige ListView<\/b>-Steuerelemente sind ein wenig aufwendiger zu befüllen. Wir schauen uns dies im Formular frmListView_Mehrspaltig <\/b>an.<\/p>\n Hier haben wir ebenfalls ein ListView<\/b>-Steuerelement namens ctlListView <\/b>hinzugefügt.<\/p>\n Wir führen ebenfalls beim Laden des Formulars eine Ereignisprozedur aus (siehe Listing 1). Diese deklariert neben dem ListView<\/b>-Objekt noch ein Objekt mit dem Typ ListItem<\/b>.<\/p>\n Listing 1: Füllen eines ListView-Steuerelements mit mehreren Spalten<\/span><\/b><\/p>\n Das ist nötig, weil wir zum Anzeigen weiterer Spalten neben der ersten Spalte nicht einfach die Add<\/b>-Methode des ListView<\/b>-Objekts nutzen können. Stattdessen nutzen wir das Objekt, das wir mit dieser Add<\/b>-Methode erstellen und das wir mit der Variablen objListItem <\/b>referenzieren. Dieses bietet seinerseits eine Auflistung namens ListSubItems <\/b>mit einer Add<\/b>-Methode an, die allerdings etwas andere Parameter bietet. Die beiden Parameter Icon <\/b>und SmallIcon <\/b>fallen weg, dafür gibt es den Parameter ReportIcon<\/b>. Dieser ist aber funktional mit dem Parameter SmallIcon <\/b>identisch.<\/p>\n Damit in der Ansicht lvwDetail <\/b>überhaupt Einträge angezeigt werden, müssen wir die Spalten definieren. Das erledigen wir mit der Add<\/b>-Methode der Auflistung Columnheaders <\/b>des ListView<\/b>-Objekts.<\/p>\n Dieser übergeben wir nach Wunsch mit dem ersten Parameter einen Index, an dem die neue Spalte angelegt werden soll, mit dem zweiten den Key, also einen eindeutigen Wert, der mit einem Buchstaben beginnen muss und mit dem dritten die Beschriftung der Spalte. Hier legen wir beispielsweise drei Spalten an.<\/p>\n Danach erstellen wir den ersten Eintrag, wobei wir mit der Add<\/b>-Methode der ListItems<\/b>-Auflistung aber erst die erste Spalte füllen. Das Ergebnis der Add<\/b>-Methode referenzieren wir mit der Variablen objListItem<\/b>. Hier nutzen wir die oben bereits erwähnte Add<\/b>-Methode der ListSubItems<\/b>-Auflistung, um die Elemente der weiteren Spalten hinzuzufügen. Das Ergebnis sehen wir in Bild 9.<\/p>\n Bild 9: ListView-Steuerelements mit mehreren Spalten<\/span><\/b><\/p>\n Im nächsten Beispiel sehen wir uns an, wie wir ein ListView<\/b>-Steuerelement mit Bildern oder Icons füllen können. Hier benötigen wir zusätzlich zum ListView<\/b>-Steuerelement noch ein ImageList<\/b>-Steuerelement, das als Container für die zu verwendenden Icons dient. Dieses fügen wir auf die gleiche Weise hinzu wie das ListView<\/b>-Steuerelement. Das Formular sieht in der Entwurfsansicht nun wie in Bild 10 aus. Um das Aussehen des ImageList<\/b>-Steuerelements brauchen wir uns keine Gedanken zu machen, da es in der Formularansicht ohnehin ausgeblendet wird.<\/p>\n Bild 10: ListView-Steuerelement und ImageList-Steuerelement in einem Formular<\/span><\/b><\/p>\n Um dem ImageList-Steuerelement Icons hinzuzufügen, wählen wir aus seinem Kontextmenü den Eintrag ImageListCtrl|Properties <\/b>aus und erhalten den Dialog aus Bild 11. Hier legen wir die Größe für die zu entnehmenden Bilder fest, in diesem Fall 32 x 32 Pixel.<\/p>\n Bild 11: Eigenschaften des ImageList-Steuerelements<\/span><\/b><\/p>\n Dann wechseln wir zur zweiten Registerseite dieses Steuerelements. Hier können wir mit der Schaltfläche Insert Picture… <\/b>einen Dateiauswahldialog öffnen, mit dem wir die einzufügenden Dateien auswählen.<\/p>\n Hier können wir alle gängigen Bildformate mit Ausnahme von PNG <\/b>auswählen. Außerdem können wir auch mehrere Bilder gleichzeitig selektieren.<\/p>\n Nach der Auswahl dieser Bilder zeigt der Dialog sie wie in Bild 12 an. Damit wir die Bilder einfacher identifizieren können, weisen wir jedem Bild noch einen Wert für die Eigenschaft Key <\/b>zu, zum Beispiel den Dateinamen ohne Dateiendung.<\/p>\n Bild 12: Weitere Eigenschaften des ImageList-Steuerelements<\/span><\/b><\/p>\n Nun wollen wir diese Bilder nutzen, um das ListView<\/b>-Steuerelement in diesem Formular damit zu füllen. Dazu nutzen wir wieder die Form_Load<\/b>-Ereignisprozedur:<\/p>\n Hier deklarieren wir Variablen für das ListView<\/b>– und das ImageList<\/b>-Steuerelement und außerdem eine Variable des Typs ListImage<\/b>. Die ersten beiden füllen wir direkt mit den Verweisen auf die Object<\/b>-Eigenschaft der jeweiligen Steuerelemente.<\/p>\n Dann passen wir die Eigenschaften des ListView<\/b>-Steuerelements wie zuvor an, verwenden aber diesmal die Ansicht lvwIcon<\/b>.<\/p>\n Damit das ListView<\/b>-Steuerelement weiß, aus welcher Quelle die anzuzeigenden Icons stammen, weisen wir der Eigenschaft Icons <\/b>das ImageList<\/b>-Objekt zu.<\/p>\n Wichtig ist, dass die zuwiesene Referenz auf die Object<\/b>-Eigenschaft des ImageList<\/b>-Steuerelements und nicht auf das Steuerelement selbst verweist.<\/p>\n Nun behelfen wir uns einer kleinen Schleife über alle im ImageList<\/b>-Steuerelement enthaltenen Icons, um nicht alle in einzelnen Anweisungen hinzuzufügen. In der Schleife durchlaufen wir alle Elemente der Auflistung ListImages <\/b>und referenzieren das aktuelle Element jeweils mit der Variablen objListImage<\/b>.<\/p>\n Innerhalb der Schleife weisen wir dem ListView<\/b>-Steuerelement mit der Add<\/b>-Methode der ListItems<\/b>-Auflistung jeweils einen neuen Eintrag zu.<\/p>\n Dabei übergeben wir als Key <\/b>den Buchstaben a <\/b>mit dem jeweiligen Index<\/b>-Wert von objListImage<\/b>. Als Text übergeben wir den Wert der Eigenschaft key <\/b>des Eintrags, also den Wert, den wir im Eigenschaften-Dialog für die einzelnen Bilder hinterlegt haben. Und schließlich legen wir für die Eigenschaft Icon <\/b>den Key des Icons aus dem ImageList<\/b>-Steuerelement fest.<\/p>\n Wichtig sind an dieser Stelle zwei Dinge im Vergleich zu den übrigen Ansichten: In der Ansicht lvwIcon <\/b>müssen wir die ImageList der Eigenschaft Icons <\/b>zuweisen. Bei den anderen Ansichten weisen wir diese der Eigenschaft SmallIcons <\/b>zu. Und beim Zuweisen der Icons zu den Einträgen verwenden wir analog den Parameter Icon<\/b>, während wir bei den anderen Eigenschaften den Parameter SmallIcon <\/b>nutzen.<\/p>\n Das Ergebnis sehen wir in Bild 13.<\/p>\n Bild 13: Icons im ListView-Steuerelement<\/span><\/b><\/p>\n Hier können wir die Eigenschaft Arrange <\/b>nutzen, um die Icons von oben nach unten oder von links nach rechts zu füllen.<\/p>\n Weiter oben haben wir bereits ein mehrspaltiges ListView<\/b>-Steuerelement erstellt. Diesem wollen wir nun Icons hinzufügen. Dazu legen wir wieder ein ImageList<\/b>-Steuerelement im Formular an, diesmal in frmListView_Mehrspaltig_Icons<\/b>. Die Icons sollen diesmal nicht 32 x 32 Pixel groß sein, sondern 16 x 16 Pixel. Diese Einstellungen müssen wir vor dem Einfügen der Icons vornehmen.<\/p>\n Danach fügen wir die Form_Load<\/b>-Prozedur wie in Listing 2 hinzu. Hier deklarieren wir die notwendigen Variablen und weisen diesen die Object<\/b>-Eigenschaft des ListView<\/b>– und des ImageList<\/b>-Steuerelements zu.<\/p>\n Listing 2: Füllen eines ListView-Steuerelements mit mehreren Spalten und Icons<\/span><\/b><\/p>\n Dann stellen wir die Eigenschaften wie üblich ein und legen diesmal die Eigenschaft SmallIcons <\/b>statt Icons <\/b>auf die ImageList<\/b>-Variable fest. Außerdem fügen wir zwei Spalten hinzu. Die erste soll das Icon und den Namen des Icons anzeigen, die zweite nur den Namen des Icons (das ist wenig einfallsreich, aber zu Beispielzwecken ausreichend).<\/p>\n Schließlich durchlaufen wir wieder die ListImages<\/b>-Auflistung des ImageList<\/b>-Steuerelements und fügen für jedes Element einen neuen Eintrag zum ListView<\/b>-Steuerelement hinzu.<\/p>\n Dabei legen wir das Hauptelement wieder so an, dass es durch die Variable objListItem <\/b>referenziert wird. Außerdem übergeben wir für den Parameter SmallIcon <\/b>den Namen des einzufügenden Icons.<\/p>\n Für das erste Unterelement, als den Wert für die zweite Spalte, übergeben wir nochmals den Namen des Icons.<\/p>\n Das Ergebnis sehen wir in Bild 14. <\/p>\n Bild 14: ListView-Steuerelement mit mehrspaltigen Einträgen und Icons<\/span><\/b><\/p>\n Weiter oben haben wir bereits alle Eigenschaften beschrieben, die wir über die Benutzeroberfläche einstellen können. Es gibt jedoch noch weitere Eigenschaften, die sich nur per VBA steuern lassen:<\/p>\n![\"Auswahl](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_002.png\")
<\/p>\n![\"ListView-Steuerelement](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_003.png\")
<\/p>\nGrundeinstellungen vornehmen<\/h2>\n
![\"Eigenschaften](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_004.png\")
<\/p>\nEigenschaften des ListView-Steuerelements<\/h2>\n
Eigener Eigenschaftendialog<\/h2>\n
![\"Anzeigen](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_005.png\")
<\/p>\n![\"Eigener](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_006.png\")
<\/p>\n\n
Eigenschaften per Eigenschaftenblatt oder VBA festlegen?<\/h2>\n
Me.ctlListView oder objListView?<\/h2>\n
Dim <\/span>objListView As <\/span>MSComctlLib.ListView<\/pre>\nSet<\/span> objListView = Me.ctlListView.Object<\/pre>\n![\"Eigenschaften](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_009.png\")
<\/p>\nEinspaltiges ListView-Steuerelement mit Daten füllen<\/h2>\n
Private Sub <\/span>Form_Load()\r\n Dim <\/span>objListView As <\/span>MSComctlLib.ListView\r\n Set<\/span> objListView = Me.ctlListView.Object\r\n \r\n With<\/span> objListView\r\n .View = lvwList\r\n .BorderStyle = ccNone\r\n .Appearance = ccFlat\r\n \r\n .ListItems.Add , \"a1\", \"Text 1\"\r\n .ListItems.Add , \"a2\", \"Text 2\"\r\n .ListItems.Add , \"a3\", \"Text 3\"\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n\n
![\"ListView-Steuerelement](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_007.png\")
<\/p>\nMehrspaltiges ListView-Steuerelement mit Daten füllen<\/h2>\n
Private Sub <\/span>Form_Load()\r\n Dim <\/span>objListView As <\/span>MSComctlLib.ListView\r\n Dim <\/span>objListItem As <\/span>MSComctlLib.ListItem\r\n Set<\/span> objListView = Me.ctlListView.Object\r\n \r\n With<\/span> objListView\r\n .View = lvwReport\r\n .LabelEdit = lvwManual\r\n .BorderStyle = ccNone\r\n .Appearance = ccFlat\r\n \r\n .ColumnHeaders.Add , \"c1\", \"Spalte 1\"\r\n .ColumnHeaders.Add , \"c2\", \"Spalte 2\"\r\n .ColumnHeaders.Add , \"c3\", \"Spalte 3\"\r\n \r\n Set<\/span> objListItem = .ListItems.Add(, \"a11\", \"Text 1 Spalte 1\")\r\n objListItem.ListSubItems.Add , \"a12\", \"Text 1 Spalte 2\"\r\n objListItem.ListSubItems.Add , \"a13\", \"Text 1 Spalte 3\"\r\n Set<\/span> objListItem = .ListItems.Add(, \"a21\", \"Text 2 Spalte 1\")\r\n objListItem.ListSubItems.Add , \"ab22\", \"Text 2 Spalte 2\"\r\n objListItem.ListSubItems.Add , \"ab23\", \"Text 2 Spalte 3\"\r\n Set<\/span> objListItem = .ListItems.Add(, \"a31\", \"Text 3 Spalte 1\")\r\n objListItem.ListSubItems.Add , \"ab32\", \"Text 3 Spalte 2\"\r\n objListItem.ListSubItems.Add , \"ab33\", \"Text 3 Spalte 3\"\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n![\"ListView-Steuerelements](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_008.png\")
<\/p>\nListView-Steuerelement mit Icons füllen<\/h2>\n
![\"ListView-Steuerelement](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_010.png\")
<\/p>\n![\"Eigenschaften](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_011.png\")
<\/p>\n![\"Weitere](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_012.png\")
<\/p>\nPrivate Sub <\/span>Form_Load()\r\n Dim <\/span>objIcons As <\/span>MSComctlLib.ListView\r\n Dim <\/span>objImageList As <\/span>MSComctlLib.ImageList\r\n Dim <\/span>objListImage As <\/span>MSComctlLib.ListImage\r\n Set<\/span> objIcons = Me.lvwIcons.Object\r\n Set<\/span> objImageList = Me.ctlImageList.Object\r\n With<\/span> objIcons\r\n .View = lvwIcon\r\n .Appearance = ccFlat\r\n .BorderStyle = ccNone\r\n \r\n Set<\/span> .Icons = objImageList\r\n \r\n For Each objListImage In objImageList.ListImages\r\n .ListItems.Add , \"a\" & objListImage.Index, _\r\n objListImage.Key, objListImage.Key\r\n Next<\/span> objListImage\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n![\"Icons](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_013.png\")
<\/p>\nIcons in mehrspaltigen ListView-Steuerelementen<\/h2>\n
Private Sub <\/span>Form_Load()\r\n Dim <\/span>objIcons As <\/span>MSComctlLib.ListView\r\n Dim <\/span>objListItem As <\/span>MSComctlLib.ListItem\r\n Dim <\/span>objImageList As <\/span>MSComctlLib.ImageList\r\n Dim <\/span>objListImage As <\/span>MSComctlLib.ListImage\r\n \r\n Set<\/span> objIcons = Me.lvwIcons.Object\r\n Set<\/span> objImageList = Me.ctlImageList.Object\r\n With<\/span> objIcons\r\n .View = lvwReport\r\n .Appearance = ccFlat\r\n .BorderStyle = ccNone\r\n \r\n Set<\/span> .SmallIcons = objImageList\r\n \r\n .ColumnHeaders.Add , \"c1\", \"Text mit Icon\"\r\n .ColumnHeaders.Add , \"c2\", \"Text ohne Icon\"\r\n \r\n For Each objListImage In objImageList.ListImages\r\n Set<\/span> objListItem = .ListItems.Add(, \"a\" & objListImage.Index, objListImage.Key, , objListImage.Key)\r\n objListItem.ListSubItems.Add , \"b\" & objListImage.Index, objListImage.Key\r\n Next<\/span> objListImage\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n![\"ListView-Steuerelement](\"..\/fileadmin\/_temp_\/2025_06\/pic_1572_014.png\")
<\/p>\nWeitere Eigenschaften des ListView-Steuerelements<\/h2>\n
\n