Senin, 09 April 2012

Tentang TreeView pada VB.Net

TreeView merupakan komponen yang digunakan untuk menampilkan informasi dalam bentuk pohon (tree). Contoh pemakaian TreeView pada dunia nyata adalah mengaktifkan pilihan melihat Folder pada Windows Explorer.

Selain itu TreeView dapat digunakan juga untuk memilih pilihan. Informasi atau pilihan yang tampil di TreeView disebut Node. Suatu node dapat memiliki node-node anak yang disebut child node. Dan node yang memiliki node anak disebut parent node.

Berikut program VB.Net sederhana untuk memakaian TreeView.

Public Class Form8
    Dim currNode As TreeNode

    Private Sub btnAddProv_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAddProv.Click
        If txtProv.Text <> "" Then
            TreeView1.Nodes.Add(txtProv.Text)
        End If
    End Sub

    Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
        currNode = TreeView1.SelectedNode
    End Sub

    Private Sub btnAddKod_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAddKod.Click
        Try
            If currNode.Parent Is Nothing Then
                If txtKod.Text <> "" Then
                    currNode.Nodes.Add(txtKod.Text)
                End If
            Else
                MessageBox.Show("Harus di-add di provinsi")
            End If

        Catch ex As Exception
            MessageBox.Show("Harus pilih Provinsi")
        End Try
    End Sub
End Class

Tidak ada komentar: