Private Sub 返回当前选定的节点_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 返回当前选定的节点.Click
Try
MsgBox(TreeView1.SelectedNode.Text)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub 让树1的节点未被选定_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 让树1的节点未被选定.Click
Dim Node As New TreeNode
Node = Nothing