Penggunaan ComboBox, ListBox dan Button, dimana data yang dipilih dari di ComboBox akan di tampilkan pada ListBox dengan event klik Button :
Tampilan Layout Design adalah :
Lalu tambahkan sintax pada Button ( Select ) double klik untuk masuk ke editor lalu isikan :
Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
Dim pelajaran As String
pelajaran = combobox1.SelectedText
listbox1.Items.Add(combobox1.SelectedItem)
Dim pilihan As String
pilihan = combobox1.SelectedItem
label1.Text = "Matapelajaran : " & pilihan & " yang terpilih "
End Sub
Jalankan tekan F5, lalu pilih matapelajaran , lalu klik select, disini akan dicoba 3x pilih matapelajaran