Dator > hur du fyller upp en vb kombinationsruta med data från databastabell

  • hur du fyller upp en vb kombinationsruta med data från databastabell


  • Du ser ofta kombinationsrutor i datainmatning program eller vid påfyllning online-applikationer. Till exempel när du behöver att göra ett val från en lista med objekt såsom en lista över stater eller postnummer , klickar du ofta en kombinationsruta för att hämta ditt val . En kombinationsruta är fylld med användardefinierade objekt , som oftast görs under konstruktion tid . Men du kan också fylla en kombinationsruta med föremål från en databastabell med bara några rader kod . Fyll en VB kombinationsruta med data från databasen tabellen genom att följa dessa riktlinjer .

    Du behöver:
    Computer
    . Visual Basic -program .
    Databasfil .


    1 .
    Starta Visual Basic -program från din dator genom att klicka på Start -menyn> Program > Microsoft Visual Studio > Microsoft Visual Basic [ versionsnummer ] " .
    2 .
    Välj " Standard EXE "under " Nytt projekt " dialogrutan . Klicka på "Öppna "för att öppna ett nytt formulär .
    3 .
    Klicka på " ComboBox " kontroll från verktygslådan på vänster och dra den till mitten form . Ange dess egenskaper under "Egenskaper " fönstret till höger .
    4 .
    lägga till en " ADO " kontroll i formuläret . Ställ in sin " Synlig " egendom till False .
    5 .
    Klicka på " Visa kod " -knappen på toppen av " Project Explorer " fönstret för att börja lägga koderna . I detta exempel kommer de olika amerikanska delstaterna läggas in i kombinationsrutan från en databastabell . När blanketten belastningar under körningen , är kombinationsrutan fylls automatiskt upp . Att göra det, gå till " Form_Load " händelse och skriva en kod som liknar den nedan :

    Dim conn som ny adodb . Anslutning
    Dim rs As New ADODB. Recordset
    Set conn=DBEngine. OpenDatabase ( App. Path " \ dbDatabase. mdb " )
    Set rs=conn. OpenRecordset ( " tblStates " ; )

    Om rs. RecordCount > 0 Then
    Har visserligen inte rs. EOF
    Med Combo1
    addItem rs. Fields ( " USStateName " ) <. br /> End With
    . MoveNext
    Loop
    End If
    6 .
    trycka på F5 för att köra programmet .
    7 .
    Spara Visual Basic-projekt genom att klicka på " Arkiv> Spara projekt som "från menyn .


Previous:nothing Next:hur man skapar ett installationsprogram för ditt VB6 program





Relaterade artiklar


  • hur man skapar en kalender i php
  • hur man byter en css bakgrundsbild med javascript
  • hur man installerar komponenter hårdvara
  • hur man fixar upp och ner java bilder
  • hur man kan få en DLL för Visual Basic
  • hur man gör egna spel på Game Maker
  • hur man läser en XML -fil med PHP
  • hur du aktiverar Fjärrhjälp i registret med WSH
  • data recovery hårdvara
  • hur man sållar poster med datumintervall i Visual Basic 6