Nama domain www.web-buya.com diganti dengan nama www.arofat.com



Indonesian Arabic English
Selasa, September 02, 2014

Cara Menyimpan Dan Menampilkan Data Pada Listview - VB6

listview2Assalamualaikum....

Ceritanya lagi punya modem smart baru dan gratis unlimited 30 hari, jadi saya manfaatkan untuk memposting beberapa materi di web buya ini (adooh malah cerita ya....Laughing), nah kali ini buya akan sharing materi tentang tips dan trik yang berhubungan dengan visual basic klasik atau VB 6. Nah banyak jalan menuju Roma, maka pada  bahasa pemrograman visual basic pun ada banyak komponen yang bisa digunakan untuk menampilkan dan menyimpan data di listview, Data Grid, Data Combo dll.

Tapi anda yang ingin terlihat beda dan lebih rapi untuk dilihat, anda bisa gunakan komponen yang bernama Listview. komponen Listview mempunyai kelebihan dari komponen lainnya, diantaranya kita bisa melakukan customize pada komponen ini. ok langsung kita ke TKP :

 

Sebelum buat Project, pastikan anda sudah membuat Database

  • Buka Visual Basic 6, dan tambahkan komponen yang bertuliskan seperti berikut :

MICROSOFT WINDOWS COMMON CONTROL 6.0

  • Desain form input seperti berikut, dan sisipkan komponen ListView dan komponen lainnya, seperti capture dibawah :

listview

  • Tambahkan Module untuk koneksi ke database, codingnya dibawah :
Global conn As ADODB.Connection
Global rsbuya As ADODB.Recordset
Sub koneksi()
Set conn = New ADODB.Connection
         Set conn = New ADODB.Connection
         conn.Provider = "microsoft.jet.oledb.4.0"
         conn.CursorLocation = adUseClient
         conn.Open App.Path & "\buya.mdb"
End Sub
  • Tambahkan coding berikut pada CommadButton SIMPAN :
Set rsbuya = New ADODB.Recordset
With rsbuya
.Open "select * from buya", conn, adOpenKeyset, adLockOptimistic
.AddNew
!ID = Text1.Text
!Nama = Text2.Text
!Telp = Text3.Text
.Update
ListView1.Refresh
MsgBox "Data berhasil di simpan", vbInformation
Call List
End With
  • Tambahkan coding pada bagian Form Load
Call koneksi
Call List

Selanjutnya proses percobaan, jika berhasil akan tampak seperti gambar berikut :

listview2

 

Semoga bermanfaat

Salam Sukses

COMMENTS  

anam
Dikirim pada
Agus 17, 2012
Dikirim oleh
anam
0 sob, apa ada source code yang bisa didownload dalam bentuk .rar atau .zip mungkin............
kalo ada kirim linknya ke email saya ya.......
Gerista
Dikirim pada
Sep 20, 2012
Dikirim oleh
Gerista
0 Makasih bgt untk informasinya, tapi saya kurang mengerti untuk perintah >>Call List
Buya @Admin
Dikirim pada
Sep 20, 2012
Dikirim oleh
Buya @Admin
0 Quoting Gerista:
Makasih bgt untk informasinya, tapi saya kurang mengerti untuk perintah >>Call List

call list procedure untuk menampilkan data ke tiap object, sebetulnya call list tidak termasuk, jadi g usah dipake
alkhalifi
Dikirim pada
Okt 30, 2012
Dikirim oleh
alkhalifi
0 Good...
silahkan agan2 ma sist mampir di blog aq.
alkhalifitoma.blogspot.com




Silahkan mengkopi artikel pada website ini dengan mencantumkan sumbernya.
Jika menemukan link yang mati, silahkan kontak kami atau anda bisa mengirimkan komentar
Setelah membaca artikel diatas jangan lupa kirim Komentarnya....!!!

TINGGALKAN KOMENTAR

Mohon perhatian kepada komentator...1). Kami berhak mengedit, menyortir bahkan memblok IP anda jika dipandang tidak sesuai dengan visi dan misi kami tanpa pemberitahuan terlebih dahulu. 2). Jika anda telah mengeklik tombol send dan komentar anda belum muncul, coba dulu klik tombol 'Refresh Comments List', atau mungkin komentar anda sedang menunggu persetujuan kami untuk dipublish. 3). Jika ikon anda ingin ditampilkan di kolom komentar, silakan daftarkan email anda di Gravatar.com. Terima kasih atas komentar dan perhatian anda.

Security code
Refresh

eXTReMe Tracker
Weblog ini dibuat sebagai sarana pembelajaran... Kami berusaha untuk menyimpan seluruh catatan yang kami kumpulkan ke dalam penyimpan data online ini untuk dapat dipakai bersama. Meskipun dengan segala keterbatasan dan waktu yang ada, sehingga masih banyak yang harus dibenahi. Segala sumber data kami masukan ke dalamnya, namun ada beberapa file yang lupa sumbernya. Sehingga mohon maaf jika ada pihak yang tidak berkenan... Untuk itu segala masukan dan saran sangat kami harapkan. Semoga bermanfaat...