In Visual Basic , worden keuzelijsten vaak gebruikt in data-entry programma's en bij het indienen van informatie via online formulieren . Bijvoorbeeld, zou je nodig hebt om te kiezen uit een lijst van staten of postcodes en te klikken op een keuzelijst presenteert u met verschillende selecties . Een combo box is gevuld met door de gebruiker gedefinieerde items die kenmerkend worden toegevoegd door de programmeur in de ontwerpfase , maar u kunt ook vullen een keuzelijst met items uit een database tabel met slechts een paar regels code . Wat je nodig hebt Visual Basic geïnstalleerd Databasebestand Toon Meer Aanwijzingen Launch 1 Visual Basic door te klikken op de knop "Start " en selecteer " Programma's , " " Microsoft Visual Studio " en vervolgens " Microsoft Visual Basic [ versienummer ] . " kopen van 2 Selecteer " Standard EXE " onder de " New Project "dialoogvenster . Klik op " Open" om een nieuw formulier te openen . Klik 3 op de " ComboBox " controle van de Toolbox aan de linkerkant en sleep het naar het centrum formulier . Stel de eigenschappen onder het venster Eigenschappen aan de rechterkant. 4 Voeg een " ADO " controle in het formulier. Stel haar " Zichtbaar " eigenschap in op " False ". 5 Klik op de " View Code " knop aan de bovenkant van het venster Project verkenner om te beginnen met het toevoegen van code . In het onderstaande voorbeeld wordt de 50 staten van de VS worden toegevoegd in de keuzelijst uit een database tabel . Wanneer het formulier wordt geladen tijdens runtime , wordt de keuzelijst opgevuld automatisch . Ga naar de " Form_Load " gebeurtenis en voer code vergelijkbaar volgende : Dim conn als Nieuwe ADODB.ConnectionDim rs As New ADODB.RecordsetSet conn = DBEngine.OpenDatabase ( App.path & " \\ dbDatabase . mdb " ) Set rs = conn.OpenRecordset ( " tblStates " ) op Twitter Als rs.RecordCount > 0 ThenDo Terwijl Niet rs.EOFWith Combo1.AddItem rs.Fields ( " USStateName " ) End With.MoveNextLoopEnd Als Druk 6 de " F5 " toets op uw toetsenbord om uw programma uit te voeren . 7 Sla uw Visual Basic -project door te klikken op " File " en vervolgens " Save project als " uit het menu .
|