Kombo VB.NetBox Kontrol dengan CONTOH

Apa itu Combobox Control?

Kontrol combobox membantu Anda menampilkan daftar drop-down dengan banyak item. Lihat sebagai kombinasi kotak teks tempat pengguna memasukkan teks dan daftar dropdown tempat pengguna memilih item. Perhatikan bahwa combobox menampilkan satu item dalam satu waktu.

Membuat Kotak Kombo

Sebuah KomboBox dapat dibuat sebagai berikut:

Langkah 1) Buat Aplikasi baru.

Langkah 2) Tarik kontrol kotak kombo dari kotak peralatan ke formulir.

Membuat Kotak Kombo

Anda akan membuat kontrol kotak kombo.

Menambahkan Item ke Kotak Kombo

Sekarang setelah kita membuat kotak kombo, mari kita tunjukkan cara menambahkan item ke dalamnya.

Double klik kontrol kotak kombo yang telah Anda tambahkan. Anda akan dipindahkan dari tab desain ke tab dengan kode.

Untuk menambahkan item ke kontrol kotak kombo, kita menggunakan properti Items. Mari kita tunjukkan ini dengan menambahkan dua item ke kotak kombo, Pria dan Wanita:

ComboBox1.Items.Add("Male")
ComboBox1.Items.Add("Female")

Kita juga dapat memilih untuk menambahkan item ke kotak kombo pada waktu desain dari jendela Properti. Berikut langkah-langkahnya:

Langkah 1) Buka tab desain dan klik kontrol kotak kombo.

Langkah 2) Pindah ke jendela Properties dan lihat opsi Item.

Langkah 3) Klik … yang terletak di sebelah kanan (Koleksi).

Menambahkan Item ke Kotak Kombo

Langkah 4)Anda akan melihat jendela baru. Di sinilah Anda harus menambahkan item ke kotak kombo, seperti yang ditunjukkan di bawah ini:

Menambahkan Item ke Kotak Kombo

Langkah 5) Setelah selesai mengetik item, klik tombol OK.

Langkah 6) Klik tombol Mulai pada bilah alat bagian atas, lalu klik ikon tarik-turun pada kotak kombo.

Menambahkan Item ke Kotak Kombo

Item berhasil ditambahkan ke kontrol kotak kombo.

Memilih Item Kotak Kombo

Anda mungkin perlu menyetel item default yang akan dipilih saat formulir dimuat. Anda dapat melakukannya melalui metode SelectedItem(). Misalnya, untuk menyetel jenis kelamin default yang dipilih menjadi Pria, Anda dapat menggunakan pernyataan berikut:

ComboBox1.SelectedItem = "Male"

Saat Anda menjalankan kode tersebut, kontrol kotak kombo akan terlihat seperti di bawah ini:

Memilih Item Kotak Kombo

Mengambil Nilai Combobox

Anda bisa mendapatkan item yang dipilih dari kotak kombo Anda. Ini dapat dilakukan dengan menggunakan properti teks. Mari kita tunjukkan ini dengan menggunakan kotak kombo di atas dengan dua item, yaitu Pria dan Wanita. Ikuti langkah-langkah yang diberikan di bawah ini:

Langkah 1) Double klik kotak kombo untuk membuka tab dengan VB.NET kode.

Langkah 2) Tambahkan kode berikut:

Public Class Form1
    Private Sub ComboBox1_SelectedIndexChanged(sd As Object, evnt As EventArgs) Handles ComboBox1.SelectedIndexChanged

        Dim var_gender As String

        var_gender = ComboBox1.Text

        MessageBox.Show(var_gender)
		
    End Sub
End Class

Langkah 3) Klik tombol Start dari toolbar untuk menjalankan kode. Anda akan mendapatkan formulir berikut:

Mengambil Nilai Combobox

Langkah 4) Klik tombol dropdown dan pilih jenis kelamin Anda. Dalam kasus saya, saya memilih Pria, dan saya mendapatkan yang berikut:

Mengambil Nilai Combobox

Berikut ini tangkapan layar kodenya:

Mengambil Nilai Combobox

Penjelasan Kode:

  1. Membuat kelas bernama Form1. Kelas akan dapat diakses publik karena pengubah aksesnya disetel ke Publik.
  2. Memulai sub-prosedur bernama ComboBox1_SelectedIndexChanged. Ini dibuat secara otomatis saat Anda mengklik dua kali kontrol kotak kombo dari tab desain. Subprosedur ini akan dipanggil saat Anda memilih item dari kotak kombo. sd As Object merujuk ke objek yang memunculkan peristiwa sementara peristiwa As EventArgs memiliki data peristiwa s.
  3. Membuat string integer bernama var_gender.
  4. Menetapkan nilai variabel var_gender ke item yang dipilih pada kotak kombo.
  5. Mencetak nilai variabel var_gender pada PesanBox.
  6. Akhir dari KomboBox1_SelectedIndexSub-prosedur diubah.
  7. Akhir dari kelas Form1.

Menghapus Item Kotak Kombo

Anda dapat menghapus item dari kotak kombo. Ada dua cara untuk melakukannya. Anda dapat menggunakan indeks item atau nama item.

Saat menggunakan indeks item, Anda harus menggunakan properti Items.RemoveAt() seperti yang ditunjukkan di bawah ini:

ComboBox1.Items.RemoveAt(1)

Dalam contoh di atas, kita menghapus item yang terletak pada indeks 1 kotak kombo. Perhatikan bahwa indeks kotak kombo dimulai pada indeks 0, yang berarti bahwa perintah di atas akan menghapus item kedua dari kotak kombo.

Untuk menghapus item menggunakan namanya, Anda harus menggunakan properti Items.Remove() seperti yang ditunjukkan di bawah ini:

ComboBox1.Items.Remove("Female")

Kode di atas seharusnya menghapus item bernama Female dari ComboBox1.

Mengikat Sumber Data

Sebuah KomboBox dapat diisi dari Kumpulan Data. Pertimbangkan SQL Query yang diberikan di bawah ini:

select emp_id, emp_name from employees; 

Anda dapat membuat sumber data dalam suatu program lalu menggunakan kode berikut untuk mengikatnya:

comboBox1.DataSource = ds.Tables(0)
comboBox1.ValueMember = "emp_id"
comboBox1.DisplayMember = "emp_name"

Ini akan memberi Anda cara mudah untuk mengisi kontrol kotak kombo Anda dengan data tanpa harus mengetikkan setiap item satu per satu.

Acara SelectedIndexChanged

Jenis peristiwa ini dipanggil saat Anda mengubah item yang dipilih pada kotak kombo Anda. Ini adalah peristiwa yang harus Anda gunakan saat Anda perlu menerapkan tindakan saat terjadi perubahan pada item yang dipilih di kotak kombo. Mari kita tunjukkan ini dengan menggunakan contoh:

Langkah 1) Buat Aplikasi Formulir Jendela baru.

Langkah 2) Setelah itu Anda perlu melakukannya Tarik dan letakkan dua kontrol kotak kombo ke dalam formulir.

Acara SelectedIndexChanged

Langkah 3) Double klik di dalam formulir untuk membuka tab kode. Masukkan kode berikut:

Public Class Form1
    Private Sub Form1_Load(sd As Object, evnt As EventArgs) Handles MyBase.Load

        ComboBox1.Items.Add("Males")

        ComboBox1.Items.Add("Females")

    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

        ComboBox2.Items.Clear()

        If ComboBox1.SelectedItem = "Males" Then

            ComboBox2.Items.Add("Nicholas")

            ComboBox2.Items.Add("John")

        ElseIf ComboBox1.SelectedItem = "Females" Then

            ComboBox2.Items.Add("Alice")

            ComboBox2.Items.Add("Grace")

        End If
    End Sub
End Class

Langkah 4) Klik tombol Start dari bilah atas untuk menjalankan kode. Anda akan mendapatkan output berikut:

Acara SelectedIndexChanged

Langkah 5) Klik tombol dropdown pada kotak kombo pertama dan pilih Pria. Pindahkan kursor tetikus ke kotak kombo kedua dan klik tombol dropdown-nya. Lihat item yang tersedia:

Acara SelectedIndexChanged

Langkah 6) Pindah ke kotak kombo pertama dan pilih Wanita. Pindah ke kotak kombo kedua dan lihat item yang tersedia:

Acara SelectedIndexChanged

Berikut ini tangkapan layar kodenya:

Acara SelectedIndexChanged

Penjelasan Kode:

  1. Membuat kelas bernama Form1.
  2. Mulai dari sub-prosedur bernama Form1_Load(). Ini akan dipicu setelah formulir dimuat. Objek sd As mereferensikan objek yang memunculkan peristiwa sementara sistem As EventArgs memiliki data peristiwa.
  3. Menambahkan item Pria ke KomboBox1.
  4. Menambahkan item Wanita ke KomboBox1.
  5. Akhir dari sub-prosedur Form1_Load().
  6. Mulai dari sub-prosedur bernama ComboBox1_SelectedIndexChanged(). Ini akan dipanggil saat item dipilih pada kotak kombo pertama. Pengirim As Object merujuk pada objek yang memunculkan peristiwa sementara e As EventArgs memiliki data peristiwa.
  7. Buat KomboBox2 kosong, hapus semua item darinya.
  8. Menciptakan suatu kondisi. Memeriksa apakah item yang dipilih ada di ComboBox1 adalah Laki-laki.
  9. Tambahkan item Nicholas ke ComboBox2 ketika kondisi di atas benar, yaitu item dipilih pada KomboBox1 adalah Laki-laki.
  10. Tambahkan item John ke ComboBox2 ketika kondisi di atas benar, yaitu item dipilih pada KomboBox1 adalah Laki-laki.
  11. Menciptakan suatu kondisi. Memeriksa apakah item yang dipilih ada di ComboBox1 adalah Wanita.
  12. Tambahkan item Alice ke ComboBox2 ketika kondisi di atas benar, yaitu item dipilih pada KomboBox1 adalah Wanita.
  13. Tambahkan item Grace ke ComboBox2 ketika kondisi di atas benar, yaitu item dipilih pada KomboBox1 adalah Wanita.
  14. Akhir dari blok If.
  15. Akhir dari KomboBox1_SelectedIndexChanged() sub-prosedur.
  16. Akhir kelas Formulir1.

Kesimpulan

  • Sebuah KomboBox dibuat dengan menyeretnya dari kotak peralatan dan meletakkannya ke dalam formulir.
  • Ini memberi kami cara menyajikan banyak pilihan kepada pengguna.
  • Kita dapat mengatur item default untuk dipilih pada ComboBox ketika formulir dimuat.
  • Peristiwa SelectedIndexChanged membantu kita menentukan tindakan yang akan diambil saat item tertentu dipilih pada kotak kombo.