加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

vb.net 教程 3-4 窗体编程 公共控件10 TreeView 4

发布时间:2020-12-17 07:32:48 所属栏目:百科 来源:网络整理
导读:上一节讲了如何用代码增加删除根节点、子节点,本节谈谈TreeView中的事件: AfterSelect事件:在选定树节点后发生 NodeMouseClick事件:当用户使用鼠标单击 TreeNode 时发生 这两个事件都提供了一个参数 e 但是所对应的类型不一样。 AfterSelect事件参数e是T
上一节讲了如何用代码增加删除根节点、子节点,本节谈谈TreeView中的事件:

AfterSelect事件:在选定树节点后发生
NodeMouseClick事件:当用户使用鼠标单击 TreeNode 时发生

这两个事件都提供了一个参数 e
但是所对应的类型不一样。
AfterSelect事件参数e是TreeViewEventArgs类,
NodeMouseClick事件参数e是TreeNodeMouseClickEventArgs类。
但是两个e都提供了Node属性,都是当前被选中/单击的节点。

在上一节设计器的基础上添加Label5:
代码中加入:
    Private Sub TreeView1_AfterSelect(sender As Object,e As TreeViewEventArgs) Handles TreeView1.AfterSelect
        Dim tnNode As New TreeNode
        tnNode = e.Node
        Label5.Text = tnNode.FullPath
    End Sub

    Private Sub TreeView1_NodeMouseClick(sender As Object,e As TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseClick
        Dim tnNode As New TreeNode
        tnNode = e.Node
        Label5.Text = tnNode.Text
    End Sub

运行时效果如图:
可以看到Label5显示了选中节点的全路径,而不是显示的节点的名称,
可见NodeMouseClick在AfterSelect之前发生。

另外值得一提的是,由于设置了TreeView的PathSeparator属性为:,所以在全路径中会显示为“”来分隔,当然可以设置为别的字符串:


学习更多vb.net知识,请参看 vb.net 教程 目录

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读