Selasa, 13 November 2012

LATIHAN KONTROL DASAR ( LISTBOX ) VISUAL BASIC 2010

Standard
Keberadaan listbox pada sebuah form dirasa sangat penting mengingat tool ini merupakan tool yang masuk kedalam katagori tool yang sering digunakan, sehingga kita harus menguasai teknik dasarnya. Lagsung saja ke latihan. Buatlah sebuah form dengan desain sebagai berikut :


Terdapat satu textbox yang berguna untuk menginputkan data. Selain textbox juga ada komponen penting yaitu listbox, ada dua listbox yang akan kita gunakan untuk menanmpung data. Selain itu ada juga tombol tombol yang akan digunakan untuk control program. Setelah membuat dan menambahkan elemen - elemen diatas pada form,kemudian beri coding. Berikut coding beserta penjelasan singkat pada bagian komentar :

Tombol tambahkan :
 If TextBox1.Text = "" Then    'Digunakan untuk mendeteksi textbox1 kosong
            MsgBox("Mohon Isikan inputan") 'perintah yang akan dilakukan jika textbox masih kosong dan tombol tambakan ditekan
        End If
        ListBox1.Items.Add(TextBox1.Text) ' menambahkan item dari textbox1 ke listbox1
        TextBox1.Text = "" ' mengosongkan kembali textbox1 setelah item dipindahkan ke listbox

Tombol Pindah :
ListBox2.Items.Add(ListBox1.SelectedItem) ' memindah kan item terpilih dari listbox1 ke listbox2


Tombol Pindah semua :
For Each item In ListBox1.Items
            ListBox2.Items.Add(item)   ' menggunakan perulangan untuk menambah semua item ke list box 2 dari listbox1


Tombol Hapus :
ListBox1.Items.Remove(ListBox1.SelectedItem) 'menghapus item terpilih pada listbox1


Tombol Hapus (Lstbx2) :
ListBox2.Items.Remove(ListBox2.SelectedItem) 'menghapus item

Tombol Hapus Semua :
ListBox2.Items.Clear() ' menghapus semua item pada listbox2

Tombol keluar : 
Me.Dispose() ' keluar



gb Hasil akhir


Demikan semoga berguna bagi pembaca sekalian.

1 komentar: