Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
  Derniers articles
  • Comment accéder aux tables de mots …
  • VBA codage Tricks 
  • Comment programmer un ordre du jour …
  • Les avantages des contrôles Active …
  • Comment faire un Crosshair Universal…
  • VBScript et SQL Didacticiel 
  • Comment construire une table d'ordin…
  • Comment commencer à Visual Basic 
  • Comment exécuter un fichier EXE De …
  • Comment accéder à la zone de liste…
  •   Visual Basics 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
  •  
    Visual Basics programmation

    Comment faire pour accéder à une boîte de liste de requêtes

    Savoir mettre les résultats d'une requête à un contrôle de zone de liste et utiliser ses valeurs dans une autre requête peut rendre vos applications de base de données plus dynamique. Microsoft Office Access vous permet de créer une interface utilisateur graphique (GUI) , ajoutez un contrôle de zone de liste et l'utiliser pour afficher les données de la requête. L'accès est un système de gestion de base de données relationnelle couramment utilisée pour les plus petites bases de données . Une requête est utilisée pour extraire des données d' une table de base de données. Visual Basic pour Applications ( VBA) est un langage de programmation informatique utilisé pour automatiser des tâches de routine. 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 l'onglet "Créer" et sélectionnez " Form Design " pour créer une nouvelle forme . Cliquez sur " List Box" sur le volet " Commandes ", puis cliquez sur votre formulaire , maintenez le bouton de la souris et faites glisser la souris pour créer une nouvelle liste de contrôle de la boîte. Cliquez sur " Bouton " sur le volet "Controls " pour ajouter un nouveau bouton à votre formulaire de la même manière que vous avez ajouté la boîte de liste.
    3

    clic droit " Command0 " et sélectionnez "Propriétés ». Cliquez sur l'onglet "Evénement" et sélectionnez " [Procédure événementielle ] " à côté de " Sur clic». Cliquez sur le bouton de sélection ( ... ) pour ouvrir la fenêtre " Microsoft Visual Basic "
    4

    Copiez et collez le code suivant dans " Private Sub Command0_Click () ": .

    Dim strSQL As String

    strSQL = " SELECT Orders . [ Employee ID ] , "

    strSQL = strSQL & "Ordres . [ ID client ], les commandes. [Date envoi] , "

    strSQL = strSQL & " Ordres. [ Nom du navire ] , ordres . [ Ship Adresse] "

    strSQL = strSQL & " FROM Orders "

    strSQL = strSQL & " WHERE ( ( ( Orders. [ Ship Adresse ]) = '123 8th Street ')); "

    Me.List0.RowSource = strSQL

    Ce code va interroger le " commandes " table et régler" RowSource " propriété de la liste de contrôle de la boîte.
    5

    revenir à la fenêtre de Microsoft Access et clic-droit" List0 ", puis sélectionnez " Propriétés ". Cliquez sur l'onglet "Evénement" et sélectionnez " [Procédure événementielle ] " à côté de " après mise à jour . " Cliquez sur les points de suspension (...) pour ouvrir la fenêtre " Microsoft Visual Basic "
    6

    Copiez et collez le code suivant dans " Private Sub List0_Click () ": .

    Dim dbs As Database

    rst As Recordset

    sqlstr Dim As String

    Dim je As Integer

    Set dbs = CurrentDb

    i = 0 To Me ! List0.ListCount

    Si moi! List0.Selected (I) Puis

    sqlstr = " SELECT Orders . [Date envoi] FROM Orders "

    sqlstr = sqlstr & " où les commandes [Employee ID] = . " & ( Me! List0.ItemData (I) ) & " ; "

    Set rst = dbs.OpenRecordset ( sqlstr )

    rst.MoveLast

    rst.MoveFirst

    Debug.Print " date d'expédition pour l'article sélectionné :" & rst.Fields (0 ) Valeur

    rst.Close
    .

    End If

    Ensuite je

    dbs.Close

    Ce code permet d'afficher la «date Expédié « les éléments sélectionnés dans la zone de liste . Les résultats seront affichés dans la fenêtre " immédiate" .
    7

    fermer la fenêtre " Microsoft Visual Basic " et clic-droit " Form1 ", puis sélectionnez " Mode formulaire. " Cliquez sur " Command0 " pour remplir la zone de liste avec des données. Sélectionnez une valeur dans la zone de liste pour exécuter le code pour le contrôle zone de liste .

     
    Article précédent:
    Article suivant:
    Articles recommandés
  • La fonction VB pour une longueur de cordes 
  • Comment puis-je faire un 3 Column Grid 
  • Comment utiliser WM_DROPFILES en VBA 
  • Comment faire pour modifier le classeur actif dans VBA 
  • Comment attribuer une expression à une étiquette dans Visual Basic 
  • Comment faire un message secret utilisant VB 
  • Comment préserver variables en VBA 
  • Qu'est-ce que mswinsck.ocx 
  • Comment faire pour supprimer le dernier caractère de VB.Net 
  • Parties d'une fenêtre d'application Visual Basic 
  • Connaissances Informatiques © http://www.ordinateur.cc