Cara Menyimpan data ke ListView Menggunakan VB.Net 2008

Selamat Sore . . .
Terimakasih telah berkunjung di Blog Nasib Marbun, Pada sore ini saya akan melanjutkan postingan artikel mengenai VB.Net 2008 tentang Cara Menyimpan data ke ListView Menggunakan VB.Net 2008 yang masih berhubungan dengan portingan artikel yang sebelumnya (Baca di Sini). 

Langkah awal untuk menyimpan data ke ListView Menggunakan VB.Net 2008 kita terlebih dahulu mendesain di Form, Seperti gambar dibawah !!!

 

Ketentuan :

• Name "Nama" = nama
• Name "Alamat" = alamat
• Name "No Handphone" = nohandphone
• Name "ListView1" = lv
• Name "Simpan Data Ke ListView" = simpan
• Data Input = Nama,Almat, No HandPhone
• Menyimpan Data Ke ListView =  Simpan Data Ke ListView

Koding Menyimpan data ke ListView Menggunakan VB.Net 2008 :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call Buattable()
    End Sub
    Sub Buattable()
        lv.Columns.Add("Nama", 120, HorizontalAlignment.Center)
        lv.Columns.Add("Alamat", 160, HorizontalAlignment.Center)
        lv.Columns.Add("No Handphone", 120, HorizontalAlignment.Center)

        lv.View = View.Details
        lv.GridLines = True
        lv.FullRowSelect = True

    End Sub
    Sub isitabel()
        Dim isi As New ListViewItem
        isi.Text = nama.Text
        isi.SubItems.Add(alamat.Text)
        isi.SubItems.Add(nohandphone.Text)
        lv.Items.Add(isi)
    End Sub

    Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click
        Call isitabel()
        nama.Text = ""
        alamat.Text = ""
        nohandphone.Text = ""
    End Sub
End Class

Jika dijalankan programnya, maka hasilnya akan seperti dibawah ini :

Sekian untuk artikel tentang Cara Menyimpan data ke ListView Menggunakan VB.Net 2008. Semoga bermanfaat !!!