Kamis, 31 Maret 2011

Menampilkan Data Mahasiswa dlm List view

Berikut adalah Coding untuk menampilkan Data Mahasiswa pada Form Data Mahasiswa
yang semula tampil di ListBox, diganti menjadi ListView.

Setelah Form dibuat maka berikut adalah codingnya :

Public Class Form1

'Membuat Variable Array
Dim Listtxt(3) As String
Dim Listitem As ListViewItem


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

'Memasukan nilai ke variable Array
Listtxt(0)=Trim(TextBox1.Text)
Listtxt(1)=Trim(TextBox2.Text)
Listtxt(2)=Trim(TextBox3.Text)

'Untuk Memasukkan ke ListView dari Variable

ListItem = New ListViewItem (Listtxt)
ListView1.Items.Add (Listitem)

End Sub

'Setting kolom List View

Sub setlistview()
ListView1.View = View.Details

'untuk Menentukan kolom

ListView1.Colums.Add ("NPM",100,Horizontal........Centre)
ListView2.Colums.Add ("Nama",200,Horizontal........Left)
ListView3.Colums.Add ("Alamat",400,Horizontal........Left)

End Sub

Private Sub ListView1.Item Selection........ListView1.ItemSelectionChanged
'Untuk mengambil data dari ListView yang di sorot ke TextBox

Textbox4.Text = e.Item.Text

End Sub

Maka dengan memasukkan coding diatas, tampilan data mahasiswa akan masuk ke ListView...

Tidak ada komentar:

Posting Komentar