Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
Dim nodx As Node
' Hauptknoten
TreeView1.Nodes.Clear
Set TreeView1.ImageList = imlImagelist
Set nodx = TreeView1.Nodes.Add(, , "Knoten1", "Text für Knoten1")
Debug.Print imlImagelist.ListImages.Count
nodx.Image = imlImagelist.ListImages.Item(1).Index
' ImageList1.ListImages(1) beinhaltet das Bild für den Hauptknoten
nodx.SelectedImage = imlImagelist.ListImages.Item(2).Index
' ImageList1.ListImages(2) beinhaltet das Bild für den Hauptknoten wenn dieser Gewählt/Aufgeklappt ist
'1. Unterknoten
Set nodx = TreeView1.Nodes.Add("Knoten1", tvwChild, "1.Blatt", "Text für 1. Unterknoten")
nodx.Image = imlImagelist.ListImages.Item(2).Index
' usw