Form 1

Listview adalah sebuah tempat digambar atau dibuatnya sebuah tabel pada Program VB NET 2008. Pada postingan ini saya akan berbagi pengalaman saya Membuat Tabel di ListView VBNET 2008.

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call buattabel()

    End Sub

    Sub buattabel()
        lv.Columns.Add("NPM", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Nama", 150, HorizontalAlignment.Left)
        lv.View = View.Details
        lv.GridLines = True
        lv.FullRowSelect = True

    End Sub
    Sub isitable()
        Dim lst As New ListViewItem
        lst.Text = npm.Text
        lst.SubItems.Add(nama.Text)
        lv.Items.Add(lst)
Baca Juga :Tutorial Membuat Tabel di ListView VBNET 2008
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Me.Close()
    End Sub

    Private Sub btnisi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnisi.Click
        Call isitable()
        npm.Text = ""
        nama.Text = ""
    End Sub

    Private Sub btnhapusnpm_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapusnpm.Click
        lv.Items.Remove(lv.SelectedItems(0))

    End Sub

    Private Sub btnhapuslist_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapuslist.Click
        lv.Items.Clear()
    End Sub
End Class

Semoga Artikel Membuat Tabel di ListView VBNET 2008 Bermanfaat!