{"id":55000212,"date":"2014-04-01T00:00:00","date_gmt":"2020-01-24T15:58:57","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=212"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Das_TreeViewSteuerelement_Grundlagen_Teil_II","status":"publish","type":"post","link":"https:\/\/access-basics.de\/index.php\/Das_TreeViewSteuerelement_Grundlagen_Teil_II.html","title":{"rendered":"Das TreeView-Steuerelement: Grundlagen, Teil II"},"content":{"rendered":"

Das TreeView-Steuerelement ist der Alleskönner zur Anzeige hierarchischer Daten. Sie zeigen damit sowohl die Daten aus Tabellen mit reflexiver Verknüpfung an als auch Daten, die aus verschiedenen verknüpften Tabellen stammen – wie etwa Kunden und Projekte. Das Steuerelement kann als ActiveX-Steuerelement im Gegensatz zu den eingebauten Steuerelementen von Access nicht direkt an eine Datenherkunft gebunden werden, also ist ein wenig Handarbeit nötig, um dieses zu füllen. In dieser Artikelreihe lernen Sie die Grundlagen zu diesem Steuerelement kennen und erfahren, wie Sie es mit Daten füllen.<\/p>\n

Beispieldatenbank<\/h2>\n

Die Beispiele dieses Artikels finden Sie in der Datenbank 1308_TreeView.mdb<\/b>.<\/p>\n

TreeView-Verlust vorbeugen<\/h2>\n

Gerade während der Entwicklung und beim Experimentieren mit den Möglichkeiten des TreeViews treten des öfteren Fehler auf. Wird ein Fehler nicht behandelt, führt dies dazu, dass Objektvariablen wie obj-TreeView <\/b>zurückgesetzt und somit geleert werden.<\/p>\n

Das bedeutet, das erstens keine für dieses Steuerelement programmierten Ereignisse mehr ausgelöst werden und dann der Zugriff per Code auf die entsprechende Objektvariable wiederum zu Fehlern führt.<\/p>\n

Es gibt jedoch eine Möglichkeit, diese Variable bei Bedarf immer wieder neu mit einem Verweis auf das TreeView<\/b>-Steuerelement zu füllen.<\/p>\n

Dazu deklarieren Sie die Variable zum Speichern des Verweises ähnlich wie zuvor, diesmal allerdings unter einem anderen Namen – nämlich m_TreeView<\/b>. Der Grund ist, dass wir den zuvor verwendeten Namen objTreeView <\/b>als Name einer Property Get<\/b>-Prozedur verwenden. Genaueres über solche Prozeduren erfahren Sie in einem späteren Artikel über die Klassenprogrammierung unter VBA – fürs erste reicht es, wenn Sie wissen, dass die Property Get<\/b>-Prozedur ähnlich wie eine Funktion einen Wert oder einen Verweis zurückliefert.<\/p>\n

In diesem Fall prüft diese Prozedur, ob die Variable m_TreeView <\/b>bereits gefüllt ist, und zwar durch den Is<\/b>-Vergleich mit dem Ausdruck Nothing<\/b>. Ist dies wahr, wurde die Variable entweder noch nicht befüllt oder ist durch einen Fehler wieder geleert worden.<\/p>\n

In beiden Fällen soll diese jedoch gefüllt werden. Der Inhalt der Variablen wird dann, unabhängig davon, ob er erst jetzt gefüllt wurde oder bereits gefüllt war, mit der Property Get<\/b>-Prozedur objTreeView<\/b> zurückgegeben (siehe Listing 1).<\/p>\n

Dim <\/span>WithEvents m_Treeview As <\/span>MSComctlLib.TreeView\r\nPrivate Property Get <\/span>objTreeView() As <\/span>MSComctlLib.TreeView\r\n     If <\/span>m_Treeview Is Nothing Then<\/span>\r\n         Set<\/span> m_Treeview = Me!ctlTreeView.Object\r\n     End If<\/span>\r\n     Set<\/span> objTreeView = m_Treeview\r\nEnd Property<\/span><\/pre>\n
Listing 1: objTreeView liefert immer einen Verweis auf das TreeView-Steuerelement in ctlTreeView.<\/p>\n
objTreeView <\/b>muss auf diese Weise nicht mehr in der Form_Load<\/b>-Ereignisprozedur gefüllt werden.<\/p>\n
Dieses Beispiel finden Sie im Formular frmTreeView_mTreeView<\/b>.<\/p>\n
TreeView-Eigenschaften per Code einstellen<\/h2>\n
Wenn Sie hier und da TreeView<\/b>-Steurelemente einbauen, möchten Sie vielleicht gern die Eigenschaften wie bei einem TreeView<\/b>-Steuerelement einstellen, mit denen bereits gute Erfahrungen in einer anderen Anwendung gemacht haben.<\/p>\n
In meinen Anwendungen verzichte ich daher völlig auf die Einstellung der Eigenschaften über den entsprechenden Dialog des TreeView<\/b>-Steuerelements im Formularentwurf. Ich stelle die Eigenschaften immer gleich beim Laden des Formulars per VBA-Code ein. Für einige Standardeigenschaften, die sich auf das Aussehen des TreeView<\/b>-Steuerelements beziehen, sieht dies etwa wie folgt aus:<\/p>\n
Private Sub <\/span>Form_Load()\r\n     With<\/span> objTreeView\r\n         .Appearance = ccFlat\r\n         .BorderStyle = ccNone\r\n         .LineStyle = tvwRootLines\r\n         .Style = µ \r\n             tvwTreelinesPlusMinusText\r\n     End With<\/span>\r\nEnd Sub<\/span><\/pre>\n
In den folgenden Beispielen kommen je nach Bedarf noch weitere Eigenschaften hinzu. Wenn Sie diese Eigenschaften für TreeView<\/b>-Steuerelemente in andere Formulare oder gar andere Anwendungen übernehmen möchten, kopieren Sie einfach die entsprechenden Codezeilen in die Form_Load<\/b>-Prozedur.<\/p>\n
TreeView füllen<\/h2>\n
Nun haben wir die Voraussetzungen dafür geschaffen, dass TreeView-Steuerelement per VBA mit den gewünschten Werten zu füllen.<\/p>\n
Das TreeView<\/b>-Steuerelement besitzt eine Auflistung namens Nodes<\/b>, die alle im TreeView<\/b>-Steuerelement angezeigten Element aufnimmt. Ein einzelnes Element im TreeView <\/b>heißt dementsprechend Node<\/b>. Um ein Node<\/b>-Objekt zum TreeView hinzuzufügen, verwenden Sie die Add<\/b>-Methode der Nodes<\/b>-Auflistung.<\/p>\n
Wenn Sie einen Node zur obersten Ebene der Hierarchie im TreeView<\/b>-Steuerelement einfügen möchten, sieht der Aufruf etwa wie in Listing 2 aus. Das Element wird hier bei Laden des Formulars hinzugefügt (siehe Bild 1). <\/p>\n
\"Erstes<\/a><\/p>\n
Bild 1: Erstes Element im TreeView-Steuerelement<\/p>\n
Die Add<\/b>-Methode erwartet die folgenden Parameter:<\/p>\n