Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Slik bruker du en VB for å ringe tilgang til en Query
    Å vite hvordan man skal spørre en Access database tabellen ved hjelp av Microsoft Visual Basic.NET kan gjøre Windows-program mer dynamisk . Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. VB.NET er et programmeringsspråk som brukes til å lage Windows-programmer . I noen få skritt , kan du opprette en VB.NET applikasjonen tilgang til Northwind database som følger med MS Office og spørre kundene tabellen . Du trenger
    Microsoft Visual Basic
    Microsoft Office Access
    Vis flere instruksjoner
    en

    Åpne Microsoft Visual Basic Express og klikk "New Project ... " på den venstre ruten på skjermen. Dobbeltklikk på " Console Application. "
    2

    Skriv inn følgende i den aller første linjen av " Module1.vb " :

    Importen System.Data.OleDb


    3

    Skriv inn følgende under " Sub Main ( ) " for å erklære variabler : en

    Dim conn Som OleDbConnection

    Dim strSQL As String

    Dim ds Som datasett

    Dim tmpStr As String
    4

    Skriv inn følgende for å opprette en ny utvalgsspørring til å spørre "Kundene " tabellen : en

    strSQL = "SELECT kunder * FROM kunder, "

    conn = Ny OleDbConnection _

    ( " Provider = Microsoft.ACE.OLEDB.12.0 ; datakilde = F: . \\ DemandStudios \\ Arkiv \\ Northwind 2007.accdb ; " )
    5

    Skriv inn følgende for å opprette en ny tilkobling til databasen : en

    Dim myConnection Som OleDbConnection = Ny OleDbConnection

    Dim da As OleDbDataAdapter

    da = Ny OleDbDataAdapter ( strSQL , conn )

    ds = Ny datasettet
    6

    Skriv inn følgende å sløyfe gjennom alle postene som returneres av spørringen og lagre dem til en streng variabel: .

    da.Fill ( ds , " kunder" )

    Hver rowCust I ds.Tables ( " kunder" ) Rader

    tmpStr = tmpStr & . rowCust ( "Selskapet" ) toString ( ) & "

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan kan definere verdier i Visual Basic 
    ·Hvordan lage en VBS Script 
    ·Hvordan kan jeg tjene en 3 kolonne Grid 
    ·Hvordan få en verdi fra HKEY_CLASSES_ROOT i Visual Bas…
    ·Hvordan finne den høyeste verdien i en Array i Visual …
    ·Hvordan lage en VBA Macro 
    ·Hvordan lage et museklikk hendelse ved hjelp av Visual …
    ·Hvordan få tilgang til Remote System Information i VB6…
    ·Slik fjerner XML- koder fra en XML- fil i VB6 
    ·Hvordan lage tabeller på Runtime i Visual Basic av Com…
      Anbefalte artikler
    ·Hvordan Loop Tilbake til Tidligere Koder i Python 
    ·JavaScript som en server-side kode for Apache 
    ·Hvordan lage brukerdefinerte Unntak i Java 
    ·Hvordan få verdier fra ListBox å Send til SQL 
    ·Hvordan Graf flere datapunkter i MATLAB 
    ·Slik fjerner Padding Fra et C Structure 
    ·Hvordan lage Vb.Net Dokumentasjon 
    ·Hvordan bygge en parser i Python 
    ·Hvordan å kompilere PHP Med SSL 
    ·VB6 Tools 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/