I Visual Basic, er kombinationsbokse ofte bruges i indtastning af data programmer, og når de indsender oplysninger via online-formularer . For eksempel kan du nødt til at vælge fra en liste over stater eller postnumre og klikke på en drop-down liste giver dig med forskellige markeringer . En kombinationsboks er befolket med brugerdefinerede poster, der typisk tilføjet af programmøren på design tid , men du kan også fylde en kombinationsboks med elementer fra en database tabel ved hjælp af blot et par linjer kode. Ting du skal
Visual Basic installeret
Databasefil
Vis Flere Instruktioner
1
Launch Visual Basic ved at klikke på "Start" knappen og vælge "Programmer , "" Microsoft Visual Studio "og derefter" Microsoft Visual Basic [ versionsnummer ] . "
2
Vælg" Standard EXE "under" Nyt projekt "dialogboksen . Klik på " Åbn" for at åbne en ny formular.
3
Klik på " ComboBox " kontrol fra Toolbox til venstre , og træk det til midten formularen. Fastsætte sine egenskaber under vinduet Egenskaber til højre.
4
Tilføj en " ADO " kontrol i formularen. Indstil dens " Synlig " ejendom til " False ".
5
Klik på " View Code" -knappen på toppen af vinduet Project Explorer til at begynde at tilføje kode. I eksemplet nedenfor, vil de 50 amerikanske stater blive tilføjet til kombinationsboks fra en database tabel. Når formularen belastninger ved runtime , er kombinationsboksen fyldt op automatisk. Gå til " Form_Load " begivenhed og indtast koden ligner følgende : Hej
Dim conn som ny ADODB.ConnectionDim rs As New ADODB.RecordsetSet conn = DBEngine.OpenDatabase ( App.Path & "\\ DBDATABASE . mdb " ) Set rs = conn.OpenRecordset ( " tblStates " )
p Hvis rs.RecordCount > 0 ThenDo While Not rs.EOFWith Combo1.AddItem rs.Fields ( " USStateName " ) End With.MoveNextLoopEnd Hvis
6
Tryk på " F5 "-tasten på tastaturet for at køre dit program.
7
Gem din Visual Basic-projekt ved at klikke på "File " og derefter "Gem projekt som "fra menuen.