[VB.NET] TreeView

TreeView

1. TreeView 생성 후 속성창에서 Nodes 설정

2. Add Root를 통해 부모 노드 추가

   Add Child를 통해 자식 노드 추가

 

3. TextBox를 통한 노드 추가

Public Class Form1
    Dim Bool_Select As Boolean = False

    ' 부모노드 추가
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If (Trim(TextBox1.Text) <> "") Then
            TreeView1.Nodes.Add(TextBox1.Text)
        End If
    End Sub

    ' 자식노드 추가
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If (TreeView1.GetNodeCount(True) > 0) Then  ' 노드가 존재할 경우
            If (Bool_Select = True) Then            ' 선택이 참이면
                TreeView1.SelectedNode.Nodes.Add(TextBox1.Text)
            End If
        Else                                        ' 노드가 존재하지 않으면
            Bool_Select = False
        End If
    End Sub

    ' 노드 삭제
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        If (TreeView1.GetNodeCount(True) > 0) Then  ' 노드가 존재할 경우
            If (Bool_Select = True) Then            ' 선택이 참이면
                TreeView1.Nodes.Remove(TreeView1.SelectedNode)
            End If
        Else                                        ' 노드가 존재하지 않으면
            Bool_Select = False
        End If
    End Sub

    Private Sub TreeView1_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles TreeView1.AfterSelect
        If (Bool_Select = False) Then
            Bool_Select = True
        End If
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
End Class