Kali ini kita akan bahas artikel tentang Menampilkan isi ListView ke textbox di VB.Net.
berikut listing programnya
Pada Properties Listview1 ubah :
GridLines : True
FullRowSelect : True
View : Details
Klik Kanan pada Listview dan klik Edit Columns
Tambahkan 2 buah Columns dengan klik Add
berikut hasil runingnya
berikut listing programnya
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public Class Form1 | |
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click | |
Dim lvl As New ListViewItem | |
lvl.Text = TextBox1.Text | |
lvl.SubItems.Add(TextBox2.Text) | |
ListView1.Items.Add(lvl) | |
lvl = Nothing | |
TextBox1.Text = "" | |
TextBox2.Text = "" | |
End Sub | |
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged | |
If ListView1.SelectedItems.Count > 0 Then | |
TextBox1.Text = ListView1.SelectedItems(0).SubItems(0).Text | |
TextBox2.Text = ListView1.SelectedItems(0).SubItems(1).Text | |
End If | |
End Sub | |
End Class |
Pada Properties Listview1 ubah :
GridLines : True
FullRowSelect : True
View : Details
Klik Kanan pada Listview dan klik Edit Columns
Tambahkan 2 buah Columns dengan klik Add
berikut hasil runingnya
Comments
Post a Comment