主题：窗口目录树节点图标,请教老师

动态设置就行，如

 Dim tr  As WinForm.TreeView
tr = Forms("窗口1").Controls("TreeView1")
For Each nd As WinForm.TreeNode In tr.AllNodes
    If nd.Level = 0 Then
        nd.IconFile = "d:\test.ico"
    Else If nd.level = 1 Then
        nd.IconFile = "d:\test.ico"
    End If
Next