Menggunkan Object ListBox Visual Basic 2010 (VB2010)

¨       Buat project baru dengan cara File-> New Project

¨       Berinama project  sesuka anda
Buat rancangan form seperti gambar di bawah ini;

 Tabel Object

¨      

¨       Double klik pada tombol Add, Ketikkan kode program seperti di bawah ini
Me.ListBox1.Items.Add(TextBox1.Text)

¨       Double klik pada tombol Select, Ketikkan kode program seperti di bawah ini

        ListBox1.SelectionMode = SelectionMode.MultiExtended

        For i = 0 To ListBox1.Items.Count - 1

            ListBox1.SetSelected(i, True)

        Next

¨       Double klik pada tombol Remove, Ketikkan kode program seperti di bawah ini

        If ListBox1.SelectedIndices.Count <> 0 Then

            For i = ListBox1.SelectedIndices.Count - 1 To 0 Step -1

                ListBox1.Items.RemoveAt(ListBox1.SelectedIndices(i))

            Next

        End If

¨       Double klik pada tombol Clear, Ketikkan kode program seperti di bawah ini

ListBox1.Items.Clear()

¨       Double klik pada tombol Clear, Ketikkan kode program seperti di bawah ini

TextBox3.Text = ListBox1.Items.Count

¨       Double klik pada List Box, Ketikkan kode program seperti di bawah ini

        TextBox2.Text = ListBox1.SelectedIndex

        TextBox1.Text = ListBox1.SelectedItem

¨       Jalankan program dengan menekan tombol F5, disarankan sebelum meruning program  klik tombol Simpan (Save)

   
Download : Source Code
Download : E-Book Visual Basic 2010