Pada postingan sebelumnya kita telah membahas tentang bagaimana membuat tabel kosong pada listview pada VB Net 2008
Nah, bagaimana jika kita ingin menampilkan atau menyimpan
data pada ListView?
Itulah yang akan kita bahas pada postingan artikel kali ini tentang Visual Basic 2008.
Desain Form
Coding Program VB Net 2008
Private Sub Form1_Load(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
buattabel()
End Sub
Sub
buattabel()
lv.Columns.Add("NPM",
80, HorizontalAlignment.Center)
lv.Columns.Add("Nama",
180, HorizontalAlignment.Center)
lv.Columns.Add("Kelas",
100, HorizontalAlignment.Center)
lv.Columns.Add("Jenjang",
60, HorizontalAlignment.Center)
lv.Columns.Add("Jurusan",
120, HorizontalAlignment.Center)
lv.Columns.Add("Telp",
100, HorizontalAlignment.Center)
lv.GridLines = True
lv.View = View.Details
lv.FullRowSelect = True
End Sub
Sub
isitabel()
Dim isi
As New
ListViewItem
isi.Text = npm.Text
isi.SubItems.Add(nama.Text)
isi.SubItems.Add(kelas.Text)
isi.SubItems.Add(jenjang.Text)
isi.SubItems.Add(jurusan.Text)
isi.SubItems.Add(telp.Text)
lv.Items.Add(isi)
End Sub
Private Sub simpan_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles simpan.Click
isitabel()
End Sub
End Class
Jika dijalankan programnya, maka hasilnya akan seperti dibawah ini :
Sekian untuk artikel kali ini tentang Visual Basic 2008 atau VB Net 2008 dengan Judul Menampilkan atau Menyimpan Data ke ListView VB Net 2008.
Semoga bermanfaat..!! :-)
Salam Programmer..
Salam Programmer..
cara menyimpan di database nya gimana bang ?
BalasHapus