如何为treeview的节点设置图象属性

Question

将ｔｒｅｅｖｉｅｗ的ｓｔｙｌｅ属性设为７添加一个ListImage控件初使化程序的时候：Dim imgX As ListImage
Set imgX = ListImage１.ListImages.Add(Index, Name, LoadPicture(ico图片的文件路径))Set TreeView1.ImageList = ListImage１ok了

Answer 1

为什么我这样写Private Sub Form_Load()
    Dim node1, node2, node3, node4 As Node
      TreeView1.ImageList = ImageList1
    Set node1 = TreeView1.Nodes.Add(, , "node1", "node1", 1)
      
    Set node2 = TreeView1.Nodes.Add("node1", tvwChild, "node2", "node2", 2)    Set node3 = TreeView1.Nodes.Add("node1", tvwChild, "node3", "node3", 1)
   
    
    Set node4 = TreeView1.Nodes.Add("node1", tvwLast, "node4", "node4", 1)
End Sub那些与treeview关联图象全都变了型,在imagelist的属性已经添加了一些图象了

Answer 2

每个ｎｏｄｅ的图像要分别加载TreeView1.Nodes(Index).Image = "imagelist1的index或者name"