VB.Net ComboBox Juhtige EXAMPLE abil

Mis on kombineeritud kasti juhtimine?

Liitkasti juhtelement aitab teil kuvada paljude üksustega ripploendi. Vaadake seda kombinatsioonina tekstikastist, kuhu kasutaja teksti sisestab, ja ripploendist, millest kasutaja valib üksuse. Pange tähele, et liitkastis kuvatakse üks üksus korraga.

Liitkasti loomine

KomboBox saab luua järgmiselt:

Step 1) Looge uus rakendus.

Step 2) Lohistage liitkasti juhtelement tööriistakastist vormile.

Liitkasti loomine

Olete loonud liitkasti juhtelemendi.

Üksuste lisamine liitkasti

Nüüd, kui oleme liitkasti loonud, demonstreerime, kuidas sinna üksusi lisada.

Double klõpsake lisatud liitkasti juhtelementi. Teid viiakse kujunduse vahekaardilt koodiga vahekaardile.

Üksuse lisamiseks liitkasti juhtelemendile kasutame atribuuti Üksused. Näitame seda, lisades liitkasti kaks üksust, mees ja naine:

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

Samuti saame valida üksuste lisamise liitkasti projekteerimise ajal aknas Atribuudid. Siin on sammud.

Step 1) Avage kujunduse vahekaart ja klõpsake liitkasti juhtelementi.

Step 2) Liikuge Atribuutide aknasse ja vaadake valikut Üksused.

Step 3) Klõpsake …, mis asub (kogu) paremal pool.

Üksuste lisamine liitkasti

Step 4)Näete uut akent. Siin peaksite liitkasti üksused lisama, nagu allpool näidatud:

Üksuste lisamine liitkasti

Step 5) Kui olete üksuste sisestamise lõpetanud, klõpsake nuppu OK.

Step 6) Klõpsake ülemisel tööriistaribal nuppu Start ja klõpsake liitkastis rippmenüü ikooni.

Üksuste lisamine liitkasti

Üksused lisati edukalt liitkasti juhtpaneeli.

Kombokasti üksuste valimine

Võimalik, et peate määrama vaikeüksuse, mis valitakse vormi laadimisel. Seda saate saavutada meetodi SelectedItem() abil. Näiteks selleks, et määrata vaikimisi valitud sooks Mees, saate kasutada järgmist lauset.

ComboBox1.SelectedItem = "Male"

Koodi käivitamisel peaks liitkasti juhtelement olema järgmine:

Kombokasti üksuste valimine

Liitkasti väärtuste toomine

Valitud üksuse saate oma liitkastist hankida. Seda saab teha atribuudi teksti abil. Näidakem seda, kasutades ülaltoodud liitkasti, milles on kaks üksust, mis on mees ja naine. Järgige alltoodud samme.

Step 1) Double klõpsake vahekaardi avamiseks liitkasti VB.NET kood.

Step 2) Lisage järgmine kood:

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

Step 3) Koodi käivitamiseks klõpsake tööriistaribal nuppu Start. Peaksite saama järgmise vormi:

Liitkasti väärtuste toomine

Step 4) Klõpsake rippmenüü nuppu ja valige oma sugu. Minu puhul. Valin Male ja saan järgmise:

Liitkasti väärtuste toomine

Siin on koodi ekraanipilt:

Liitkasti väärtuste toomine

Koodi selgitus:

  1. Klassi loomine nimega Form1. Klass on avalikult juurdepääsetav, kuna selle juurdepääsumuutja on seatud väärtusele Avalik.
  2. Combo nimelise alamprotseduuri käivitamineBox1_SelectedIndexChanged. See genereeritakse automaatselt, kui topeltklõpsate kujunduse vahekaardil liitkasti juhtelementi. See alamprotseduur käivitatakse, kui valite liitkastist üksuse. sd As Object viitab objektile, mis sündmuse esile kutsus, samas kui sündmusel As EventArgs on sündmuse andmed s.
  3. Stringi täisarvu nimega var_sugu loomine.
  4. Muutuja var_gender väärtuse määramine liitkastis valitud üksusele.
  5. Muutuja var_gender väärtuse trükkimine sõnumileBox.
  6. Kombo lõppBox1_SelectedIndexChanged alamprotseduur.
  7. Form1 klassi lõpp.

Liitkasti üksuste eemaldamine

Saate üksuse liitkastist eemaldada. Selle saavutamiseks on kaks võimalust. Võite kasutada kas kaubaindeksit või üksuse nime.

Kaubaindeksi kasutamisel peaksite kasutama atribuuti Items.RemoveAt(), nagu allpool näidatud:

ComboBox1.Items.RemoveAt(1)

Ülaltoodud näites eemaldame liitkasti indeksis 1 asuva üksuse. Pange tähele, et liitkasti indeksid algavad indeksiga 0, mis tähendab, et ülaltoodud käsk eemaldab liitkasti teise üksuse.

Üksuse eemaldamiseks selle nime järgi peaksite kasutama atribuuti Items.Remove(), nagu allpool näidatud:

ComboBox1.Items.Remove("Female")

Ülaltoodud kood peaks eemaldama kombinatsioonist üksuse nimega NaineBox1.

Siduv andmeallikas

KomboBox saab täita andmestikust. Mõelge allpool toodud SQL-päringule:

select emp_id, emp_name from employees; 

Saate luua programmis andmeallika ja kasutada selle sidumiseks järgmist koodi:

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

See annab teile lihtsa viisi liitkasti juhtelementide sisestamiseks andmetega, ilma et peaksite iga üksust eraldi tippima.

SelectedIndexChanged sündmus

Seda tüüpi sündmus kutsutakse esile, kui muudate liitkastis valitud üksust. See on sündmus, mida peaksite kasutama, kui peate toimingut rakendama liitkasti valitud üksuse muutmisel. Näitame seda näite abil:

Step 1) Looge uus aknavormide rakendus.

Samm 2) Pärast seda peate Lohistage vormi kaks liitkasti juhtelementi.

SelectedIndexChanged sündmus

Step 3) Double Koodi vahekaardi avamiseks klõpsake vormi sees. Sisestage järgmine kood:

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

Step 4) Koodi käivitamiseks klõpsake ülemisel ribal nuppu Start. Peaksite saama järgmise väljundi:

SelectedIndexChanged sündmus

Step 5) Klõpsake esimeses liitkastis rippmenüü nuppu ja valige Mees. Liigutage hiirekursor teisele liitkastile ja klõpsake selle rippmenüü nuppu. Vaadake saadaolevaid üksusi:

SelectedIndexChanged sündmus

Step 6) Liikuge esimesse liitkasti ja valige Naine. Liikuge teise liitkasti ja vaadake saadaolevaid üksusi:

SelectedIndexChanged sündmus

Siin on koodi ekraanipilt:

SelectedIndexChanged sündmus

Koodi selgitus:

  1. Klassi loomine nimega Form1.
  2. Alamprotseduuri nimega Form1_Load() algus. See käivitatakse pärast vormi laadimist. Sd As Object viitab objektile, mis sündmuse esile kutsus, samal ajal kui süsteemil As EventArgs on sündmuse andmed.
  3. Kauba Mehed lisamine kombinatsiooniBox1.
  4. Kombosse üksuse Naised lisamineBox1.
  5. Form1_Load() alamprotseduuri lõpp.
  6. Combo nimelise alamprotseduuri algusBox1_SelectedIndexChanged(). See käivitatakse, kui esimeses liitkastis valitakse üksus. Saatja As Object viitab objektile, mis sündmuse esile kutsus, samas kui e As EventArgs sisaldab sündmuse andmeid.
  7. Tee ComboBox2 tühi, tühjendage sellest kõik üksused.
  8. Tingimuse loomine. Kontrollitakse, kas valitud üksus on Combo-sBox1 on mehed.
  9. Lisage kombosse üksus NicholasBox2, kui ülaltoodud tingimus on tõene, st Combo-s valitud üksusBox1 on mees.
  10. Lisage üksus John CombosseBox2, kui ülaltoodud tingimus on tõene, st Combo-s valitud üksusBox1 on mehed.
  11. Tingimuse loomine. Kontrollitakse, kas valitud üksus on Combo-sBox1 on emased.
  12. Lisage üksus Alice kombosseBox2, kui ülaltoodud tingimus on tõene, st Combo-s valitud üksusBox1 on emased.
  13. Lisage Combosse üksus GraceBox2, kui ülaltoodud tingimus on tõene, st Combo-s valitud üksusBox1 on emased.
  14. Kui ploki lõpp.
  15. Kombo lõppBox1_SelectedIndexChanged() alamprotseduur.
  16. Tunni lõpp Vorm1.

kokkuvõte

  • KomboBox luuakse, lohistades selle tööriistakastist ja pukseerides selle vormi.
  • See annab meile võimaluse esitada kasutajale palju võimalusi.
  • Saame määrata vaikeüksuse, mis valitakse kombinatsioonisBox kui vorm on laaditud.
  • Sündmus SelectedIndexChanged aitab meil määrata toimingu, mida teha, kui liitkastis on valitud konkreetne üksus.