7,788
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
笑对最好 2002-07-29
- 打赏
- 举报
你可以首先把所有的都清除
STreeView.Nodes.Clear
然后再添加父节点
好像采用clear会导致所有节点首先全部展开，
再删除！所以可以采用下面的办法
Set nodX = STreeView.Nodes.Add(, , "Root", "", 1)
或者采用遍历所有父接点下面的节点，
STreeView.Nodes.Remove ("节点名字")
STreeView.Nodes.Clear
然后再添加父节点
好像采用clear会导致所有节点首先全部展开，
再删除！所以可以采用下面的办法
Set nodX = STreeView.Nodes.Add(, , "Root", "", 1)
或者采用遍历所有父接点下面的节点，
STreeView.Nodes.Remove ("节点名字")
crycoming 2002-07-29
- 打赏
- 举报
dim nd as node
for each nd in TreeView1.nodes
if nd is "父节点" then nd.clear
next
'判断父节点可以根据事先在node.key或者node.text中加特殊标记
for each nd in TreeView1.nodes
if nd is "父节点" then nd.clear
next
'判断父节点可以根据事先在node.key或者node.text中加特殊标记
iwo99 2002-07-29
- 打赏
- 举报
我要的是清除所有的子节点，用treeview1.nodes.clear连父节点也
清除了
清除了
zhengchong 2002-07-29
- 打赏
- 举报
TreeView1.Nodes.Clear
