[VB.NET] كيف احصل على nextnode - نسخة قابلة للطباعة

كود :
Private Sub Frmnode_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        TreeView.ExpandAll()

    End Sub



    Private Sub TreeView_AfterSelect(sender As System.Object, e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView.AfterSelect

        Txtnode.Text = e.Node.Text

        If e.Node.GetNodeCount(True) = 0 Then

            Txtchildern.Text = "لايوجد"

        Else

            Txtchildern.Text = e.Node.GetNodeCount(True)

        End If



        If e.Node.FirstNode Is Nothing Then

            Txtfirstnode.Text = "لايوجد"

            Txtnextnode.Text = "لايوجد"

        Else

            Txtfirstnode.Text = e.Node.FirstNode.Text

            Txtnextnode.Text = TreeView.SelectedNode.FirstNode.NextNode.Text

        End If

    End Sub