Menampilkan Data dari Textbox ke Listview pada VB6

Menampilkan Data dari Textbox ke Listview pada VB6 - Kali ini saya memposting cara menampilkan data dari textbox ke Listview. Biasanya hal ini digunakan untuk menampilkan data sementara. Sebelumnya saya sudah pernah mencoba menggunakan MSHFlexgrid, karena tampilannya kurang bagus dan terlalu rumit pengisian codingnya akhirnya saya mencoba menggunakan Listview. Untuk penyimpanan data dari Listview ke Database kita menggunakan Microsoft Office Access. Langsung praktek aja sob…

1.       Tampilkan komponen Microsoft windows common controls 6 (sp6) dengan cara menekan CTRL + T atau pilih menu Projek -> Components -> Centang Microsoft Windows Common Control 6 (SP6).

2.       Buat form dengan components sebagai berikut:

Type	Name	Caption
Label	Label1 Label2 Label3	Nama Alamat Telepon
Textbox	txtNama txtAlamat txtTelepon	Text-nya dikosongi
Command Button	Command1	Masuk
Listview	LV	-

Kurang lebih seperti dibawah ini:

3.       Isi dengan coding berikut:

Private Sub AturLV()
With LV
.View = lvwReport
.FullRowSelect = True
.GridLines = True
With .ColumnHeaders
.Add , , "Nama", 2000
.Add , , "Alamat", 3000
.Add , , "Telepon", 2000
End With

Private Sub Form_Load()
AturLV
End Sub

Private Sub Command1_Click()
Set Lst = LV.ListItems.Add(, , txtNama.Text)
With Lst
.SubItems(1) = txtAlamat.Text
.SubItems(2) = txtTelepon.Text
End With
'mengkosongkan textbox
txtNama.Text = ""
txtAlamat.Text = ""
txtTelepon.Text = ""
End Sub

4.       Jalankan Form dengan menekan tombol F5 atau pilih play. Isi data terserah anda setelah itu tekan button masuk. Maka isi dari textbox akan masuk ke Listview seperti yang and inginkan. Gambar dibawah ini merupakan contoh yang saya buat.

 Cukup mudah bukan. 

Demikian artikel Menampilkan Data dari Textbox ke Listview pada VB6. Terima kasih atas kunjungannya.. Semoga Bermanfaat…