| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan Output flere værdier fra en Access Query
    At lære at udsende flere værdier fra en forespørgsel kan gøre din computer ansøgning mere dynamisk. Et program du kan bruge til at søge en database tabel er Microsoft Office Access. Access er en relationel database management system anvendes ofte til små lokale databaser. Visual Basic for Applications er en computer programmeringssprog, der anvendes til at automatisere rutineopgaver i Access og andre Microsoft Office-programmer. En forespørgsel bruges til at hente information fra en database tabel . Instruktioner
    1

    Start Microsoft Office Access 2010 og vælg " Tom database " og derefter klikke på "Opret ". Klik på " Database Tools" og vælg " Visual Basic ". Klik på "Indsæt "-feltet og vælg " Modul ".
    2

    Tryk på " Ctrl" og "A " og tryk " Delete " for at slette alle eksisterende kode.
    3

    Kopier og indsæt koden nedenfor ind i din modul. Underrutinen vil oprette en ny tabel , føje poster til det, og derefter forespørge flere felter . Forespørgslen vil output flere værdier for disse områder og vise dem gennem en besked boks .

    Private Sub accessMultipleQueryValues ​​()

    Dim DBS Som Database

    Dim rst Som Recordset < br >

    Dim strSQL As String

    Dim X As Integer

    Set dbs = CurrentDb

    strSQL = " CREATE TABLE multipleValues ​​( Felt1 TEKST , Felt2 TEKST , området3 TEXT) ; "

    DoCmd.RunSQL ( strSQL )

    strSQL =" INSERT INTO multipleValues ​​( Felt1 , Felt2 , området3 ) "

    strSQL = strSQL &" VALUES ( ' field1Data rækken 1 ',' field2Data række 1 ',' field3Data række 1 '); "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( strSQL )

    strSQL =" INSERT INTO multipleValues ​​( Felt1 , Felt2 , området3 ) "

    strSQL = strSQL &" VALUES ( ' field1Data række 2 ', ' field2Data række 2 ', ' field3Data række 2 '); "

    DoCmd . SetWarnings False

    DoCmd.RunSQL ( strSQL )

    strSQL = " INSERT INTO multipleValues ​​( Felt1 , Felt2 , området3 ) "

    strSQL = strSQL & " VALUES ( ' field1Data rækken 3 ',' field2Data række 3 ',' field3Data række 3 '); "

    DoCmd.SetWarnings Falske

    DoCmd.RunSQL ( strSQL )

    strSQL = " Vælg multipleValues . * fra multipleValues ​​"

    strSQL = strSQL &" WHERE multipleValues.Field1 = ' field1Data række 2 « "

    Set rst = dbs.OpenRecordset ( strSQL )

    rst . MoveLast

    rst.MoveFirst

    X = 0 Til rst.RecordCount - 1

    MsgBox " felt1 data : ." & rst.Fields (0) Value & " , field2 data : . " _

    & rst.Fields (1) Value &" , området3 data : . "& rst.Fields (2) Værdien

    rst.MoveNext
    < p> Næste X

    rst.Close

    dbs.Close

    End Sub
    4

    Tryk på " F5 " for at køre din subrutine . < br >

    Forrige :

    næste :
      Relaterede artikler
    ·Trin for at oprette en Visual Basic Application 
    ·Sådan oprettes en Fill- in-the- tom linje i Word ved h…
    ·Hvordan man kompilerer en VB.Net Application 
    ·Hvordan man programmerer et array i Visual Basic 
    ·Sådan bruges en DataTable i VB.NET 
    ·Sådan får du adgang en Make Table Query Autonummereri…
    ·Sådan får du en fuld sti i VB6 
    ·Visual Basic Sample Projekter 
    ·Sådan oprettes en Pass parameterforespørgsel Adgang i…
    ·Sådan Fix Kolonner i DataGrid 
      Anbefalede Artikler
    ·Sådan Flyt objekter ved en konstant hastighed i Unity 
    ·Sådan Generer en Random Number i C 
    ·Sådan Indsæt HTML i MySQL med PHP 
    ·Forskelle mellem AddHandler & AddType 
    ·Sådan copy & paste en webside til en anden hjemmeside 
    ·Sådan tilmelder du dig for Flash Chat 
    ·Sådan finde sange på BPM 
    ·Sådan Find Java JDK i Ubuntu 
    ·Hvordan til at konstruere en ordbog i Python 
    ·Hvad er forskellen mellem private og offentlige medlems…
    Copyright © Computer Viden http://www.computerdk.com