判断节点的name或text,看是否等于 "SQL_wdlx",如果匹配,就修改此节点的属性。
nds(i+1) = nds(i).Nodes.Add(arys(i))
Select Case nds(i+1).Name
Case "SQL_wdlx"
nds(i+1).Name = "按类型分类"
nds(i+1).Icon-File = "Folder.ico"
Case "按群组分类"
nds(i+1).Icon-File = "Ok.ico"
End Select
老师您好,这样写好像也不对。是否哪里有问题。