Fungsi & Event Controls Visual Basic .Net - VI [ ListBox ]

 

ListBox

Buat tampilan seperti gambar diatas, lalu setting properties :

 Isikan sintax pada form_load dan klik button

Private Sub Form_Load()

ListBox1.Items.Add("Matematika") 

ListBox1.Items.Add("Fisika") 

ListBox1.Items.Add("Bahasa") 

ListBox1.Items.Add("Sejarah") 

ListBox1.Items.Add("Komputer")

End Sub

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

Dim pesan As String 

Dim i As Integer 

pesan = "" 

For i = 1 To ListBox1.SelectedItems.Count 

pesan = pesan + ListBox1.SelectedItems.Item(i - 1) + vbCrLf 

Next 

TextBox1.Text = pesan

End Sub

Jalankan tekn F5, maka layoutnya :

Kemudian pilih mata pelajaran yang mau didaftar, lalu  klik Tampilkan, untuk melihat hasilnya :