? En kombinasjonsbokskontroll utelater behovet for å ha en tekstboks og en listeboks kontroll i Visual Basic-prosjektet . En kombinasjonsboks viser en tekstboks kombinert med en listeboks -kontroll , som gir brukeren mulighet til å åpne et element eller velge et element fra listen. Elementer egenskapen gir deg fleksibilitet til å manipulere elementer i kombinasjonsbokskontroll . Bruk en kombinasjonsbokskontroll å gi brukeren en liste over elementer å velge mellom, og deretter bruke det valgte elementet til å fatte vedtak i andre områder av prosjektet. Instruksjoner
en

Launch Microsoft Visual Basic Express , klikker du "New Project ... " fra ruten til venstre på skjermen , og velg "Windows Forms Application ". Klikk "OK".
2

Dobbeltklikk på " ComboBox " fra " Toolbox" -ruten for å legge til en ny kombinasjonsbokskontroll til Form . Dobbeltklikk på " Button" for å legge til en ny knapp . Legg til to flere knapper som bruker samme teknikk.
3

Dobbeltklikk på " Button1 " for å åpne " Form1.vb " modulen. Skriv inn følgende under " button1_click " for å legge til elementer i kombinasjonsboks : en

Me.ComboBox1.Items.Add ( "Data Item" )

Me.ComboBox1.Items.Add ( "Data item " )

Me.ComboBox1.Items.Add ( " Data item " )

Me.ComboBox1.Items.Add ( " Data item " )

Me.ComboBox1 . Items.Add ( "Data Item" )

Me.ComboBox1.Items.Add ( "Data Item" )
4

Klikk " Form1.vb [Design ] " og dobbeltklikk - klikk " Button2 " for å legge koden til sin klikkhendelsen . Skriv inn følgende kode til å slette duplikater i kombinasjonsboksen : en

Dim xCnt As Integer

Dim yCnt As Integer

For xCnt = 0 For å Me.ComboBox1.Items . count - 2

For yCnt = Me.ComboBox1.Items.Count - 1 til xCnt + 1 Step -1
p Hvis Me.ComboBox1.Items ( xCnt ) toString = Me.ComboBox1 . . elementer ( yCnt ) . toString Deretter

Me.ComboBox1.Items.RemoveAt ( yCnt )

End If

Neste

Neste

5

Klikk " Form1.vb [Design ] " og dobbeltklikk på " Button3 " for å legge koden til sin klikkhendelsen . Skriv inn følgende kode for å fjerne alle elementene fra kombinasjonsboksen : en

Me.ComboBox1.Items.Clear ( )
6

Klikk " Form1.vb [Design ] " og dobbeltklikk -klikk på kombinasjonsboksen kjøre kode når den valgte varen endres . Skriv inn følgende kode for å vise det valgte elementet gjennom en meldingsboks : en

MsgBox ( " Du valgte :" & Me.ComboBox1.Text.Trim )
7

Trykk " F5" å kjøre programmet og klikk " Button1 " for å legge til elementer i kombinasjonsboksen. Klikk " Button2 " for å fjerne duplisert elementet. Klikk " Button3 " for å fjerne alle elementene i kombinasjonsboksen.