UC知道vb6.0中treeview目录树中怎么加图标
来源：百度知道 编辑：UC知道 时间：2024/05/27 15:26:50
vb6.0中treeview目录树中节点前面怎么加图标
例如下面的代码，想在节点前加个图片1.gif：
TreeView1.LineStyle = tvwRootLines Dim nodX As Node
Set nodX = TreeView1.Nodes.add("teacher", tvwChild, teachername, "教师姓名")
例如下面的代码，想在节点前加个图片1.gif：
TreeView1.LineStyle = tvwRootLines Dim nodX As Node
Set nodX = TreeView1.Nodes.add("teacher", tvwChild, teachername, "教师姓名")
建一个ImageList控件，右击，属性，在“图像”里插入图片（你的1.gif），看好他们的索引（Index，默认是1）。然后，代码如下。
＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
TreeView1.ImageList = ImageList1 '关联Treeview1与Imagelist1
TreeView1.LineStyle = tvwRootLines
Dim nodX As Node
TreeView1.Nodes.Add , , "a1", "teachername"
Set nodX = TreeView1.Nodes.Add("a1", tvwChild, , "教师姓名", 1) '这个1的意思是刚才设置的图片在ImageList里的索引
End Sub
使用imagelist控件