Materi ListView

Materi ini sudah mulai masuk pada bagian mirip database , karena data yang di input belum bisa di simpan .

di bawah ini adalah contoh form nya ;

Toolbox yang di gunakan adalah ;

• Label
• TextBox
• Button
• ListView
  

Dan di bawah ini adalah codingnya ;

-------------------------------------------------------------------------------------------------------------

Public Class Form1

    'membuat variabel array

    Dim listtxt(3) As String

    Dim listitem As ListViewItem

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

        Call setlistview()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        listtxt(0) = Trim(TextBox1.Text)

        listtxt(1) = Trim(TextBox2.Text)

        listtxt(2) = Trim(TextBox3.Text)

        listitem = New ListViewItem(listtxt)

        ListView1.Items.Add(listitem)

    End Sub

    Sub setlistview()

        ListView1.View = View.Details

        ListView1.Columns.Add("NPM", 100, HorizontalAlignment.Center)

        ListView1.Columns.Add("Nama", 100, HorizontalAlignment.Left)

        ListView1.Columns.Add("Alamat", 100, HorizontalAlignment.Left)

    End Sub

    Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged

        TextBox4.Text = e.Item.Text

    End Sub

    Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged

    End Sub

End Class

 -------------------------------------------------------------------------------------------------------------

Hasil yang saya coba ;

Jangan pernah merasa lemah atau tidak bisa selama  kita masih bernyawa !