关于treeview的一些简单问题，请教高手

Question

加图片可用ImageList
加号在属性页里设一下就行了

Answer 1

ImageList将需要的图片存入，在属性页的图象列表中选中它。
其他要求修改相应属性页即可，其实你可以看看例子，很多用法都会明白的。

Answer 2

Set mNode = TreeView1.Nodes.Add(i, tvwChild)
    mNode = Trim(Mid(Trim(r!tot), InStr(Trim(r!tot), "->") + 2))
    mNode.Image = 2
    mNode.Image = 3
    mNode.ExpandedImage = 1    Set mNode = TreeView1.Nodes.Add(i, tvwChild)
    mNode = Trim(Mid(Trim(r!tot), InStr(Trim(r!tot), "->") + 2))
    mNode.Image = 2
    ax = Trim(Left(Trim(r!tot), InStr(Trim(r!tot), "->") - 1))
    mNode.Image = 3
    mNode.ExpandedImage = 1