Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Komma åt Parse Data

    Att veta hur att tolka och komma analyserade data som kan spara tid när du utvecklar ett databasprogram . Ofta databasadministratörer måste tolka data i en databas fält och lägga till andra tabeller eller använda den på andra sätt . Du kan utföra denna uppgift med hjälp av Microsoft Office Access . Access är en relationsdatabas management system som ingår i Microsoft Office-paketet . I Access kan du använda Visual Basic for Applications ( VBA ) för att analysera och komma analyserade data. Saker du behöver
    Microsoft Office Access
    Visa fler instruktioner
    1

    Starta Microsoft Office Access och välj " Tom databas " och sedan klicka på " Skapa ". Klicka på " Databas Verktyg " och välj " Visual Basic "

    Skriv följande för att skapa ett nytt förfarande : . " . Ange "

    Private Sub parseFieldData ( ) katalog

    Tryck på
    Sida 2

    Skriv följande för att förklara de variabler som du kommer att använda vid tolkning av data:

    Dim sSQL As String

    Dim db som databas

    Dim rst Som Recordset

    Dim cellIntArray ( 4 ) As String

    Dim x As Integer

    Dim y As Integer

    Dim fldStr As String

    Dim pos As Integer

    Set db = CurrentDb
    3

    Skriv följande för att skapa en ny tabell för att hålla de data som du kommer att tolka :

    sSQL = " CREATE TABLE tblParseData ( fieldData TEXT ( 100 ) ) ; "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( sSQL ) katalog

    sSQL = " INSERT INTO tblParseData VALUES ( " Denna mening ska tolkas . ' ) ; "

    DoCmd.RunSQL ( sSQL )
    4

    Skriv följande för att söka i data du lagt till i tabellen i föregående steg :

    Set rst = db.OpenRecordset ( "Välj tblParseData * från tblParseData ,. " ) katalog

    rst.MoveFirst

    fldStr = rst.Fields ( 0 ) . Value
    5

    Skriv följande för att lägga till de analyserade data till en String array :

    x = 0

    pos = InStr ( 1 , fldStr , " " )

    Gör Medan fldStr < > " "

    cellIntArray ( x ) = Vänster ( fldStr , pos ) katalog

    fldStr = Höger ( fldStr , Len ( fldStr ) - pos ) katalog

    pos = InStr 1 ( , fldStr , " " ) katalog

    x = x + 1
    p Om pos = 0 Då

    cellIntArray (x) = fldStr

    fldStr = " "

    End If

    Loop
    6

    Skriv följande för att komma till analyserade data från arrayen :

    för y = 0 till x

    Debug.Print cellIntArray ( y ) katalog

    Nästa y
    7

    Skriv följande för att stänga ditt Recordset och databasen :

    rst.Close

    db.Close

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur öppna MS Access 2003 Rapporter med Visual Basic 6
    ·Hur är kedjor Initierat i Visual Basic
    ·Hur man använder en summera inom VB.net
    ·Hur att avsluta det aktuella programmet i Visual Basic …
    ·Så här visar Word-dokument i nätet webbsidor
    ·Hur man gör Foxfire Tillägg
    ·Hur Pass jag data mellan flera former i VB.NET
    ·Hur du skriver ut en fil i Visual Basic
    ·Hur man installerar VisualStudio.Net
    ·Hur man lär sig Visual Basic 2008
    Utvalda artiklarna
    ·Hur man lyfta fram ett antal i en textruta med Microsof…
    ·Hur man dödar webbläsare nedladdningar med javascript…
    ·Hur man redigerar en bild i PHP
    ·Hur man använder de datamängder VB.NET
    ·Hur du återställer en array PHP
    ·Hur man använder Proxy i C #
    ·Vad är ett program Statement
    ·Så här aktiverar du en FTP -anslutning med PHP
    ·Javascript Grid Tutorial
    ·Hur du formaterar innehåll inom en UIScrollView
    Copyright © Dator Kunskap http://www.dator.xyz