控件:treeview
代码:
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- For i = 1 To 20
- Dim stt As New TreeNode()
- stt.Name = "teta" & i
- stt.Text = "keenweiwei" & i
- stt.ForeColor = Color.Red
- TreeView1.Nodes.AddRange(New TreeNode() {stt})
- Next
- End Sub
- Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
- MsgBox(TreeView1.SelectedNode.Text)
- End Sub
本文介绍了一个使用TreeView控件创建节点并响应选择事件的示例。通过VB.NET代码实现循环添加20个节点到TreeView中,并设置节点的名称、文本及前景色,最后演示了如何捕获所选节点的文本。
703

被折叠的 条评论
为什么被折叠?



