Kursus Programmer Online 
Skip Navigation Links
Home
Kursus online
Toko online
Layanan
Forum
Social programmer
E-book
Peta situs
Tentang saya
Donasi
Halo " !" | Login

Skip Navigation Links.
Expand Artikel Visual BasicArtikel Visual Basic
Expand Basis Data - DatabaseBasis Data - Database
Expand Pemrograman GrafisPemrograman Grafis
Expand E-Book TutorialE-Book Tutorial
Expand Video Kursus - TutorialVideo Kursus - Tutorial
Expand Software - Open Source codeSoftware - Open Source code
Expand W E B ProgrammingW E B Programming
Expand Windows SystemWindows System
Expand XBasicFrameworkXBasicFramework
Expand Berbagi PengalamanBerbagi Pengalaman
Expand Quick BasicQuick Basic

Belajar Program dgn Saya 
HyperLink Siapa bilang belajar program  SULIT!!  Otodidak juga bisa.  ANDA bisa Jadi PROGRAMMER handal.  Baca E-Book  Saya di sini...!

e-book trik dasar belajar visual basic 6

Jika ANDA telah membeli E-book Saya belum juga bisa membuat program... Saya yang akan "Turun Tangan Langsung" mengajarkannya kepada ANDA                   
















Software Gratis 
Software gratis! Open Source Code

Banner 

HyperLink

HyperLink


Chat dengan Saya 

Chat dengan Saya

HyperLink


Hit Counter 


Skip Navigation LinksMENU>Artikel Visual Basic>Visual Basic 6.0>Treeview Control


Treeview Control di Visual Basic 6.0


Treeview Control pertama kali terintegrasi pada Visual Basic 5 dan selalu digunakan untuk menampilkan informasi secara bertingkat.

Anda tentu sudah sering melihat windows explorer.
Lihat gambar di bawah ini:



Gambar di bagian adalah gambar contoh Treeview pada windows explorer.

sekarang kita akan membuat treeview dengan Dua Induk dan Empat Anak pada masing-masing cabang (Node) memakai Visual Basic.

Buka project baru pilih standard project lalu klik Project - Componen - Pilih Windows Common Control.

Lihat gambar di bawah ini:


Anda akan melihat di Toolbox sebelah kiri ada penambahan control Treeview. Lihat gambar di bawah ini:


Double klik kontrol Treeview tersebut lalu atur sedemikian rupa letaknya pada form.

Lalu ketik kode seperti dibawah ini:

Private Sub Form_Load()
  Dim NodX As Node
  TreeView1.LineStyle = tvwRootLines
  For i = 1 To 2
    TreeView1.Nodes.Add , , "keyRoot" & CStr(i), i    

      For j = 1 To 4

       Set   NodX = TreeView1.Nodes.Add("keyRoot" & CStr(i), tvwChild, "keySub" & i & j, "i" & i & "." & "j" & j)

      Next j
   Next i
End Sub


Private Sub TreeView1_NodeClick(ByVal Node As ComctlLib.Node)

   MsgBox Node.Key
End Sub


Jalankan program. Klik tanda positip pada Treeview. Lalu klik salah satu cabang. Anda akan melihat gambar seperti di bawah ini:



Untuk memperoleh penjelasan kode detail beserta dengan contoh source code nya anda bisa mendapatkannya bersama paket E-Book saya yang berjudul
E-book Trik Dasar Belajar Visual Basic 6

Contoh pemakaian pada project database Apotik  klik di sini

Jika Anda ingin mempelajari bagaimana menggunakan treeview dengan visual basic.net baca artike saya Membuat menu Treeview control dengan VB .Net




  (C)XBasicPro 2012 | Kursus Programmer Online | Software Gratis | Open Source Code | Sewa Toko Online