| 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 aggiornare una query in Access VBA
    Sapere come aggiornare i dati in una query in Microsoft Office Access utilizzando Visual Basic, Applications Edition (VBA ), è possibile risparmiare tempo quando hai bisogno di aggiornare continuamente i dati in tabelle . Access è un sistema di gestione di database relazionale comunemente usato per i database locali più piccole . Una query viene utilizzato per visualizzare i dati in una tabella di database . VBA è un linguaggio di programmazione per computer utilizzato per automatizzare le attività di routine in Access. Istruzioni
    1

    Avviare Microsoft Office Access , selezionare " Database Tools " e cliccare su " Visual Basic ". Selezionare il menu "Inserisci" , quindi fare clic su "Modulo ".
    2

    Copia e incolla il seguente codice nel modulo :

    UpdateQuery Private Sub ( ) per

    dim db As Database dim rst

    come Recordset

    dim sqlstring As String dim

    rstCnt As Integer

    Set db = CurrentDb

    sqlstring = " CREATE TABLE tableToUpdate ( primo testo , ultimo testo ) "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( SqlString ) per

    strSQL = " INSERT INTO tableToUpdate VALUES ( ' Oscar ', ' Gonzalez ') "

    DoCmd.RunSQL ( strSQL ) per

    strSQL =" INSERT INTO tableToUpdate VALUES ( ' Kitzia ', ' Ramos ') "

    DoCmd.RunSQL ( strSQL ) per

    strSQL = " INSERT INTO tableToUpdate VALUES ( ' John ', ' Smith ') "

    DoCmd.RunSQL ( strSQL ) per

    strSQL = " INSERT INTO tableToUpdate VALUES ( ' Anna ', ' Williams' ) "

    DoCmd.RunSQL ( strSQL ) per

    Set rst = db.OpenRecordset ( " SELECT * FROM tableToUpdate tableToUpdate , . " )

    rst.MoveLast

    rst.MoveFirst

    rstCnt = 0 Per rst.RecordCount - 1

    rst.Fields ( 0 ) Valore = " . Oscar "Allora

    rst.Edit

    rst.Fields ( 0 ) . Value =" Emilio "

    rst.Update

    End If

    rst.MoveNext

    Avanti rstCnt

    End Sub
    3

    Premere " F5 " per eseguire la subroutine " UpdateQuery " . La subroutine crea una nuova tabella , inserisce nuove righe di dati , query la tabella creata e aggiorna il primo campo .

    Previous :

    next :
      Articoli Correlati
    ·Come modificare una didascalia di dialogo di Windows 
    ·Come utilizzare ScrollBar in VB6 
    ·Come dichiarare una variabile in Visual Basic 
    ·Come fare un Keygen URL in VB6 
    ·Come regolare il carattere in un menu per l'Illuminazio…
    ·Come fare un Abstract di uno Script 
    ·Come convertire un oggetto String in Visual Basic 
    ·Che cosa è OCX in Visual Basic ? 
    ·Come calcolare una percentuale in VBScript 
    ·Come programmare una barra di scorrimento verticale in …
      Articoli in evidenza
    ·Come creare una tabella di un file delimitato in Visual…
    ·Come disegnare un albero utilizzando una tela in Javasc…
    ·Come verificare se una stringa in Java è l'Alfa 
    ·Come testare un CGI script Sendmail 
    ·Come utilizzare FBML Tags 
    ·Come convertire Formato data in Transact - SQL 
    ·Come scrivere Perl Script 
    ·Come compilare CPP utilizzando Visual Studio 
    ·Come stampare DOSEMU su Dot Matrix 
    ·Come scrivere una API MFC per Workstation Shutdown 
    Copyright © Conoscenza Informatica http://it.wingwit.com