| maison  | Hardware  | réseaux  | programmation  | Logiciel  | Dépannage  | systèmes |  
programmation  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
    Comment utiliser des variables dans une requête Access
    Sachant comment utiliser des variables dans les requêtes en utilisant Microsoft Office Access peut rendre votre application de base de données plus dynamique. La meilleure façon d'utiliser des variables dans les requêtes est par Visual Basic pour Applications , également connu sous VBA. VBA est un langage de programmation développé par Microsoft et est utilisé pour automatiser des processus manuels dans Microsoft Office . Une requête est utilisée pour récupérer des informations à partir d'une table de base de données. Les variables sont définies pour stocker des informations dans la mémoire de l'ordinateur lorsqu'un programme est en cours d'exécution. Instructions
    1

    Ouvrez la base de données Access Northwind Microsoft Office . La base de données Northwind est inclus dans la suite Microsoft Office.
    2

    Cliquez sur " Database Tools " puis sélectionnez " Visual Basic " pour ouvrir la fenêtre de Visual Basic de Microsoft . Cliquez sur le champ "Insérer" et sélectionner "Module ".
    3

    Copiez et collez le code suivant dans votre nouveau module à utiliser " Fournisseur A" comme une variable dans une requête de sélection et vue le prénom et le nom de " Fournisseur A":

    userQueryVariables Private Sub ()

    strSQL Dim As String

    rst As Recordset

    Dim dBS Database

    fournisseur Dim As String

    fournisseur = " fournisseur A"

    Set dbs = CurrentDb

    strSQL = " SELECT Suppliers.Company , fournisseurs . [ Nom ] , Fournisseurs . [ Prénom ] "

    strSQL = strSQL &" auprès de fournisseurs "

    strSQL = strSQL &" WHERE ( ( ( Suppliers.Company ) = ' "& (fournisseur ) & " " ) ) ; "

    Set rst = dbs.OpenRecordset ( strSQL )

    rst.MoveLast

    rst.MoveFirst

    Debug . Print (fournisseur et "Information :")

    Do While Not rst.EOF

    Debug.Print ( " Prénom: " . & rst.Fields (2) Valeur )

    Debug.Print ( " Nom: " . & rst.Fields (1) Valeur )

    rst.MoveNext

    boucle

    End Sub

    4

    Appuyez sur " F5 " pour exécuter votre routine .

    Previous :

    next :
      articles connexes
    ·Comment faire pour envoyer des commandes à une applica…
    ·Comment utiliser TryParse en Visual Basic 
    ·Comment utiliser des variables dans un VBA requêtes d'…
    ·Comment démarrer l' éditeur Visual Basic 
    ·Comment connecter deux formes dans Visual Basic 
    ·Comment définir des valeurs de propriété dans Visual…
    ·Comment faire pour activer un bouton à bascule en VBA 
    ·Comment mettre en place déploiement en VBS 
    ·Comment envoyer Vars De VBScript à un fichier batch 
    ·Comment faire pour créer une navigation de menu sur VB…
      articles en vedette
    ·Comment faire pour convertir Int flotter sur Visual Bas…
    ·Comment lire API Java 
    ·Comment modifier un fichier WAB 
    ·Comment faire pour convertir BitArray à Byte 
    ·Comment supprimer ODBC DSN sur VBNET 
    ·Comment cartographier Strings à une liste de chaînes 
    ·L'histoire de Visual Basic 6.0 
    ·La fonction de rappel en Java 
    ·Comment faire de l'encre recyclée 
    ·Comment libérer un verrou dans MySQL 
    Copyright © Connaissances Informatiques http://fr.wingwit.com