Menentukan List Combobox dengan 2 Combobox di VB.Net

Pertama buatlah form dengan menyisipkan 2 combobox, 1 textbox, serta 1 button seperti pada gambar yang ada dibawah :

setelah itu ketikan code berikut ini di combobox1

 

Public Class testcombo

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

        If Me.ComboBox1.Text = "corak Brwon" Then

            ComboBox2.Items.Clear()

            ComboBox2.Items.Add("alvin, hijau yonex")

            ComboBox2.Items.Add("cokelat tua, cokelat muda")

            ComboBox2.Items.Add("navy biru tua")

            TextBox1.Text = "Berbagi Ilmu"

        ElseIf Me.ComboBox1.Text = "corak roulette-inter milan" Then

            ComboBox2.Items.Clear()

            ComboBox2.Items.Add("marun, merah tua")

            ComboBox2.Items.Add("marun, turkis")

            ComboBox2.Items.Add("marun, yonex")

            TextBox1.Text = "Mala Doankbinkokom"

        ElseIf Me.ComboBox1.Text = "corak roulette-arsenal" Then

            ComboBox2.Items.Clear()

            ComboBox2.Items.Add("navy, biru tua")

            ComboBox2.Items.Add("navy hijau yonex")

            ComboBox2.Items.Add("navy merah tua")

            TextBox1.Text = "Siti komalasari"

        End If

    End Sub

==== selamat mencoba===