| Home  | Casa  | Hardware  | Networking  | Programmazione  | Software  | Domanda  | Sistemi  |   
Programmazione  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Java Programming

  • Programmazione Javascript

  • PHP /MySQL Programmazione

  • Perl Programming

  • Python Programming

  • rubino Programmazione

  • Nozioni di base di Visual Programming
  •  
    Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> Content
    Come estrarre i numeri in una query per l'accesso
    Microsoft Office Access è un sistema di gestione di database relazionali comunemente usato per i database più piccoli e locali . L'accesso è incluso nella suite Microsoft Office e fornisce tutti gli strumenti necessari per gestire un database relazionale . Una query viene utilizzato per recuperare informazioni da tabelle di database . Estrazione numeri da una query di Access si ottiene allo stesso modo si potrebbe estrarre altri tipi di dati . Un modo per estrarre i dati è quello di utilizzare Visual Basic , Applications Edition. In pochi passi , è possibile scrivere il codice VBA , estrarre i numeri da una query , e li visualizza nella finestra di output . Cose che ti serviranno
    Microsoft Office Access
    Northwind database di
    Show More Istruzioni
    1

    Aprire il database di Access Northwind di Microsoft Office . Il database Northwind è incluso nella suite Microsoft Office .
    2

    Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Fai clic sul menu "Inserisci" e selezionare "Modulo ".
    3

    Copia e incolla il seguente codice nel nuovo modulo di interrogare la tabella "Prodotti" e estrarre i numeri nel " riordino " campo Livello superiore a 15 :

    extractNumbers private Sub ()

    Dim strSQL As String

    Dim rst come Recordset

    Dim dbs As Database < br

    Set> dbs = CurrentDb

    strSQL = "Prodotti selezionare. [ Nome di prodotto ] , i prodotti . [Riordina Livello] "

    strSQL = strSQL & "FROM Prodotti "
    < p > strSQL = strSQL & "WHERE ( ( ( Products. [Riordina Livello] ) > 15) ) ; "

    Set rst = dbs.OpenRecordset ( strSQL ) per

    rst.MoveLast

    rst.MoveFirst

    Debug.Print " riordino Livello > 15 : "

    Do While Not rst.EOF

    Debug.Print " Nome del prodotto: "& rst.Fields ( 0 ) Valore

    Debug.Print ". "

    Debug.Print " Riordina numero di livello : " . & rst.Fields ( 1) Valore
    < p > rst.MoveNext

    loop

    End Sub

    Previous :

    next :
      Articoli Correlati
    ·Come associare un database a un controllo ComboBox in V…
    ·Come rimuovere il Combo Box Duplicati 
    ·Come uscire VBA 
    ·Come impostare la chiave di accesso in Visual Basic 
    ·Come modificare l' Alter Table & Field Name 
    ·Come controllare una stringa per l' alfabeto in codice …
    ·Come accedere alla casella combinata in una query 
    ·Come per terminare l'applicazione corrente in Visual Ba…
    ·Come allocare un VBS Dataset 
    ·Come infilare in VB.Net 
      Articoli in evidenza
    ·Come creare file di lingue per i siti web in PHP 
    ·Come utilizzare SendKeys con un URL String 
    ·Come aggiungere una descrizione comandi al ListItem 
    ·SQL Programming Certificazione 
    ·Come sostituire con VBA 
    ·Come aprire un file ICD 
    ·Come rimuovere i bordi in CSS 
    ·Un PHP Suggerire a un amico Tutorial 
    ·Tutorial per Visual Comandi di base 
    ·Come modificare il Registro di sistema in Vb.Net 
    Copyright © Conoscenza Informatica http://it.wingwit.com