请问TreeView的Node用图片代替，该怎么写?

Question

User ImageList Control,
then set treeview1 property imagelist
try it

Answer 1

已经设好imgaelist了。
插入了几个图片。

Answer 2

楼上的意思是：使用imagelist控件，在其中加入图片
将treeview1.imagelist设置为你刚加入的imagelist对象。
使用treeview1.nodes.item(i).image=i

Answer 3

Private Sub Form_Load()
   Dim nodX As Node
   Dim i As Integer
   
   Set nodX = TreeView1.Nodes.Add(, , "R", "Root")
   For i = 1 To 5
   TreeView1.Nodes.Item(i).Image = i
   Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C" & Str(i), "Child " & Str(i))
   Next
   nodX.EnsureVisible
   TreeView1.Style = tvwTreelinesText ' Style 4.
   TreeView1.BorderStyle = vbFixedSingle
End Sub

Answer 4

TreeView1.Style = tvwTreelinesPictureText