Berikut adalah cara menambahkan data di listview melalui TextBox letakan codingan di button.
Dim lv As ListViewItem
lv = Me.lvhunting.Items.Add(txtkodecm.Text)
lv.SubItems.Add(txtnamacm.Text)
lv.SubItems.Add(txtalamat.Text)
lv.SubItems.Add(txtnohp.Text)
lv.SubItems.Add(txtkodeskull.Text)
lv.SubItems.Add(txtnamasekolah.Text)
lv.SubItems.Add(txtnamapenerima.Text)
lv.SubItems.Add(txtreport.Text)
lv.SubItems.Add(txtfollow.Text)
lalu ini mengambil data di listview untuk di masukankan ke textbox
txtkodecm.Text = lvhunting.FocusedItem.Text
txtnamacm.Text = lvhunting.FocusedItem.SubItems(1).Text
txtalamat.Text = lvhunting.FocusedItem.SubItems(2).Text
txtnohp.Text = lvhunting.FocusedItem.SubItems(3).Text
txtkodeskull.Text = lvhunting.FocusedItem.SubItems(4).Text
txtnamasekolah.Text = lvhunting.FocusedItem.SubItems(5).Text
txtnamapenerima.Text = lvhunting.FocusedItem.SubItems(6).Text
txtreport.Text = lvhunting.FocusedItem.SubItems(7).Text
txtfollow.Text = lvhunting.FocusedItem.SubItems(8).Text
On Error Resume Next
'untuk remove data yang di ambil
lvhunting.FocusedItem.Remove()
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :