Kamis, 24 Maret 2011

Latihan Peggunaan ListView

Pada kesempatan kali ini kita akan membahas mengenai penggunaan ListView
Pertama tama kita buat tampilan seperti berikut










Berikut Code Programnya

Public Class LatihanListView
'membuat variabel arrray
Dim listtxt(3) As String
Dim listitem As ListViewItem

'setting kolom listview
Sub setlistview()
ListView1.View = View.Details
'untuk menentukan kolom
ListView1.Columns.Add("NPM", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("Nama", 150, HorizontalAlignment.Left)
ListView1.Columns.Add("Alamat", 200, HorizontalAlignment.Left)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'memasukkan nilai variabel array
listtxt(0) = Trim(TextBox1.Text)
listtxt(1) = Trim(TextBox2.Text)
listtxt(2) = Trim(TextBox3.Text)
'untuk memasukkan ke listview dari variabel
listitem = New ListViewItem(listtxt)
ListView1.Items.Add(listitem)
End Sub

Private Sub LatihanListView_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Call setlistview()
End Sub

Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
'untuk mengambil nilai dari listview
'e >>> berasal dari ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs
TextBox4.Text = e.Item.Text
End Sub
End Class

Jika tampilan dan sintak programnya sudah dibuat maka selanjutnya jika dijalankan programnya akan ditampilkan seperti











Coba masukkan data, misal seperti berikut ini,











Maka data yang dientry setelah di klik tombol simpan maka akan ditampilkan di dalam listview, kemudian coba klik NPM, maka pilihan tersebut akan ditampilkan di TextBox sebelah kanan tengah.

Tidak ada komentar:

Posting Komentar