I Visual Basic, er kombinasjonsboksene ofte brukt i dataregistrering programmer og når du sender informasjon via elektroniske skjemaer . For eksempel, må du kanskje velge fra en liste over stater eller postnummer og klikke en drop- down liste presenterer deg med ulike valg . En kombinasjonsboks er befolket med brukerdefinerte elementer som er typisk lagt til av programmerer på design tid , men du kan også fylle opp en kombinasjonsboks med elementer fra en database tabell ved hjelp av bare noen få linjer med kode. Du trenger
Visual Basic installert
Database file
Vis flere instruksjoner
en

Launch Visual Basic ved å klikke på "Start" -knappen og velge "Programmer , " " Microsoft Visual Studio " og deretter" Microsoft Visual Basic [ versjonsnummer ] . "
2

Velg" Standard EXE "under " New Project "dialogboksen . Klikk "Open " for å åpne et nytt skjema .
3

Klikk på " ComboBox " kontroll fra verktøykassen til venstre og dra det til sentrum skjemaet. Angi egenskapene under Properties vinduet til høyre .
4

Legg en " ADO " kontroll i skjemaet. Sette sitt " Synlig " eiendom til " False ".
5

Klikk på " Vis kode "-knappen på toppen av Project Explorer -vinduet for å begynne å legge koden . I eksempelet nedenfor , vil de 50 amerikanske statene legges inn i kombinasjonsboks fra en database tabell . Når skjemaet laster under kjøring , er kombinasjonsboksen fylt opp automatisk. Gå til " Form_Load " hendelse og skriv kode som ligner på følgende : en

Dim conn som ny ADODB.ConnectionDim rs som ny ADODB.RecordsetSet conn = DBEngine.OpenDatabase ( App.Path & " \\ DBDATABASE . mdb ") Set rs = conn.OpenRecordset ( " tblStates ")
p Hvis rs.RecordCount > 0 ThenDo Mens Ikke rs.EOFWith Combo1.AddItem rs.Fields ( " USStateName ") End With.MoveNextLoopEnd Hvis
6

Trykk " F5" tasten på tastaturet for å kjøre programmet .
7

Lagre Visual Basic-prosjektet ved å klikke på "File " og deretter " Lagre prosjekt som "fra menyen .