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

    Fråga bara vill visa siffror i Access

    Access är en relationsdatabas management system som används för att bygga små och lokala databaser . En fråga används för att hämta data från en databas tabell . Ofta programmerare behöver för att hämta nummer från en fråga i Microsoft Office Access . Det bästa sättet att uppnå denna uppgift är genom Visual Basic for Applications eller VBA . Instruktioner
    1

    Öppna Northwind Microsoft Office Access-databas som ingår i Microsoft Office-paketet . Välj " Infoga " -menyn och klicka
    2

    Kopiera och klistra in följande i din modul att ifrågasätta adressnumren i " Kunder " bord " Modul . " :

    Private Sub extractNumbers ( ) katalog

    Dim strSQL As String

    Dim rst Som Recordset

    Dim dbs som databas

    Dim qryStr As String

    Dim charRead As String

    Dim finalString As String

    Set dbs = CurrentDb

    strSQL = " SELECT Customers.Address FROM kunder , "

    Set rst = dbs . OpenRecordset ( strSQL ) katalog

    rst.MoveLast

    rst.MoveFirst

    Do While Inte rst.EOF

    qryStr = rst.Fields ( 0 ) . värde

    Do While qryStr < > " "

    charRead = Vänster ( qryStr , 1 ) katalog p Om IsNumeric ( charRead ) Sen

    finalString = finalString & charRead

    End If

    qryStr = Höger ( qryStr , Len ( qryStr ) - 1 ) katalog

    Loop

    Debug.Print finalString

    finalString = ""

    rst.MoveNext

    Loop

    rst.Close

    dbs.Close

    End Sub

    3

    Kör subrutinen genom att trycka på " F5 ".

    Tidigare:

    nästa:
    relaterade artiklar
    ·Lägga till en rad i en textruta i Visual Basic
    ·Konvertera DateDiff till Månad
    ·Hur konvertera tecken till deras ASCII-värden i Visual…
    ·Gemensamma egenskaper mellan en kryssruta & Option Butt…
    ·Hur man skapar en Drop Box Med Priser
    ·Hur Pass data från en form till en Query Åtkomst
    ·Hur man skapar ett DSN med en API -kod
    ·Hur man gör moduler i VB6
    ·Hur att felsöka VBS Script
    ·Visual Basic 2010 Handledning för nybörjare
    Utvalda artiklarna
    ·Hur att offentliggöra med CPP
    ·Hur man slår samman två MySQL Resultat i PHP
    ·Hur Lämna en Java Coding Request
    ·Hur man använder Int för att få den färg RGB Code
    ·Hur ansluta till SQLite Med Mongoose
    ·Hur man tar bort xmlns Från en tagg
    ·Hur man skapar ett lösenord för en webbplats
    ·Hur man gör en adressbok i NetBeans
    ·Hur man använder data - mining algoritmer
    ·Datatyper i VB6
    Copyright © Dator Kunskap http://www.dator.xyz