| 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 bruges variabler i Access Query
    vide hvordan man bruger variabler i forespørgsler ved hjælp af Microsoft Office Access kan gøre din database ansøgning mere dynamisk. Den nemmeste måde at bruge variabler i forespørgsler er gennem Visual Basic for Applications , også kendt som VBA. VBA er et programmeringssprog udviklet af Microsoft og bruges til at automatisere manuelle processer i Microsoft Office. En forespørgsel bruges til at hente information fra en database tabel . Variabler er defineret til at holde information i computerens hukommelse , mens et program kører . Instruktioner
    1

    Åbn Northwind Microsoft Office Access -database. Databasen Northwind er inkluderet i Microsoft Office-pakken.
    2

    Klik på " Database Tools " og derefter vælge "Visual Basic " for at åbne Microsoft Visual Basic vindue. Klik på "Indsæt "-feltet og vælg " Modul ".
    3

    Kopier og indsæt følgende kode i dit nye modul til at bruge " Leverandør A " som en variabel i en udvælgelsesforespørgsel og udsigt fornavn og efternavn på " Leverandør A":

    Private Sub userQueryVariables ()

    Dim strSQL As String

    Dim rst Som Recordset

    Dim DBS som database

    Dim leverandør As String

    leverandør = " Leverandør A "

    Set DBS = CurrentDb

    strSQL = " SELECT Suppliers.Company , leverandører . [ Efternavn ] , leverandører . [ Fornavn ] "

    strSQL = strSQL &" fra leverandører "

    strSQL = strSQL &" WHERE ((( Suppliers.Company ) = ' "& ( leverandør) & " ") ), "

    Set rst = dbs.OpenRecordset ( strSQL )

    rst.MoveLast

    rst.MoveFirst

    Debug . Print (leverandør & " Information :")

    Do While Not rst.EOF

    Debug.Print ( "Fornavn : " . & rst.Fields (2) Value)

    Debug.Print ( "Sidste navn: " . & rst.Fields (1) Value)

    rst.MoveNext

    Loop

    End Sub
    < br > 4

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

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan oprettes Menu Navigation på VB.NET 
    ·Sådan vælges Elementer i en ListBox i Visual Basic 
    ·Egenskaber af Forms i Visual Basic 
    ·Sådan bruges Arrays i Visual Basic 
    ·Hvordan laver Samtidige Sounds i VB 
    ·Sådan vises data i en DataGridView 
    ·Sådan eksporteres GridView til Excel på VB.NET 
    ·Sådan bruges To Faktadatabaser i VB 
    ·Sådan åbner xls filer på en formular i VBA 
    ·Sådan oprettes en nøglefil for dll-filer på VB.Net 
      Anbefalede Artikler
    ·Sådan bruges en C + + Vector til at gemme data 
    ·Tre primære fordele ved ENUM 
    ·Hvordan man skriver en tekst baseret spil Script i PHP 
    ·Sådan ændres SYSMAN Password 
    ·Sådan Gør Addition i Java 
    ·PHP Tutorial til Initialiser Arrays 
    ·Sådan Capture en skærm i VB 
    ·Script Vs . Indbygget funktion i SSIS 
    ·Sådan Lær C Med Xcode 
    ·JDK ikke registreres af Java 
    Copyright © Computer Viden http://www.computerdk.com