该博客主要介绍了一种在VB.NET环境下，利用Form加载事件和按钮点击事件对TreeView控件进行操作的方法。在Form加载时，实现TreeView的全部展开。在按钮点击事件中，遍历所有节点，获取并显示已检查节点的文本信息，同时过滤掉空字符串。此内容对于理解和操作Windows Forms中的树形数据结构具有指导意义。
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles MyBase.Load
Me.TreeView1.ExpandAll()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String
Me.TextBox1.Clear()
For Each node As TreeNode In Me.TreeView1.Nodes
s = getNodeText(node)
If String.IsNullOrEmpty(s) = False Then
Me.TextBox1.Text &= s
End If
Next
End Sub
Function getNodeText(ByVal pNode As TreeNode) As String
Dim s As String = String.Empty
If pNode.Checked Then s &= pNode.Text & System.Environment.NewLine
If pNode.Nodes.Count > 0 Then
For Each node As TreeNode In pNode.Nodes
s &= getNodeText(node)
Next
End If
Return s
End Function
End Class
扫一扫
264
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
