VB中TreeView常用方法

最新推荐文章于 2021-09-03 10:05:49 发布

昵称不能为空？

最新推荐文章于 2021-09-03 10:05:49 发布

阅读量3.9k

点赞数

CC 4.0 BY-SA版权

文章标签： vb object image

本文链接：https://blog.youkuaiyun.com/zhangting1987/article/details/1872625

本文介绍了如何使用TreeView进行节点的判断、删除及添加等基本操作。包括判断节点是否存在、清除所有节点、添加根节点及其子节点的方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1。判断节点是否存在
if   treeview1.nodes("你的关键字")   is   nothing   then
          msgbox   "该节点不存在！"
end   if
前提是要有关键字

2。删除节点
' Removes currently selected node, or root if nothing is selected.
TreeView1.Nodes.Remove(TreeView1.SelectedNode)
' Clears all nodes.
TreeView1.Nodes.Clear()

3。添加节点

object.Add(relative, relationship, key, text, image, selectedimage)

Private Sub Form_Load()
   ' Set Treeview control properties.
   TreeView1.LineStyle = tvwRootLines  ' Linestyle 1

   ' Add Node objects.
   dim nodParent as node, nodChild as node
   ' 设置根节点　
   Set nodParent = TreeView1.Nodes.Add(, , "r", "Root")

   'nodChild 为nodParent的子节点
   Set nodChild  = TreeView1.Nodes.Add("r", tvwChild, "child1", "Child")
或者
   Set nodChild  = TreeView1.Nodes.Add(nodParent, tvwChild, "child1", "Child") 
End Sub