vb6.0中如何清除treeview1根目录下的文件夹？
答案:2 悬赏:0 手机版
解决时间 2021-03-26 03:38
- 提问者网友：焚苦与心
- 2021-03-25 11:20
vb6.0中如何清除treeview1根目录下的文件夹？
最佳答案
- 五星知识达人网友：七十二街
- 2021-03-25 12:44
TreeView1.Nodes.Clear追问这把根目录也清除了！我想只清除指定根目录下的文件夹！追答While TreeView1.Nodes(1).Children > 0
TreeView1.Nodes.Remove (TreeView1.Nodes(1).Child.Key)
Wend
TreeView1.Nodes.Remove (TreeView1.Nodes(1).Child.Key)
Wend
全部回答
- 1楼网友：傲气稳了全场
- 2021-03-25 13:19
Dim nd As Node, curND As Node, nextND As Node
Set nd = TreeView1.Nodes("root1") '指向“根目录”
Set curND = nd.Child '指向第一个子节点
For i = 1 To nd.Children '子节点个数
Set nextND = curND.Next
TreeView1.Nodes.Remove curND.Key
Set curND = nextND
Next
Set nd = TreeView1.Nodes("root1") '指向“根目录”
Set curND = nd.Child '指向第一个子节点
For i = 1 To nd.Children '子节点个数
Set nextND = curND.Next
TreeView1.Nodes.Remove curND.Key
Set curND = nextND
Next
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯