Σε αυτό το σεμινάριο, θα μάθετε πώς να ανοίγετε και να εκτελείτε ερωτήματα στο VBA.
Δημιουργήσαμε έναν πίνακα που ονομάζεται ProductsT και ένα απλό ερώτημα επιλογής που επιλέγει την κατηγορία προϊόντος όπου το όνομα του προϊόντος είναι το προϊόν BBB, από τον πίνακα.
Άνοιγμα ερωτήματος με VBA
Μπορείτε να χρησιμοποιήσετε τη μέθοδο DoCmD.OpenQuery για να ανοίξετε/δείτε ένα ερώτημα που έχετε δημιουργήσει. Ο ακόλουθος κώδικας θα ανοίξει το ερώτημα που ονομάζεται QueryOne:
DoCmd.OpenQuery "QueryOne"
Το αποτέλεσμα είναι:
Η σύνταξη της μεθόδου DoCmd.OpenQuery είναι:
DoCmd.OpenQuery (QueryName, Θέα, DataMode) όπου:
| Παράμετρος | Περιγραφή |
|---|---|
| QueryName | Το όνομα ενός υπάρχοντος ερωτήματος στη βάση δεδομένων που θέλετε να ανοίξετε/δείτε. |
| Θέα | Η προβολή στην οποία θέλετε να ανοίξετε το ερώτημα. Αυτό μπορεί να είναι acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview ή acViewReport. Η προεπιλογή είναι acViewNormal. (Προαιρετικός) |
| DataMode | Η λειτουργία εισαγωγής δεδομένων στην οποία θέλετε να ανοίξετε το ερώτημά σας. Αυτή μπορεί να είναι acAdd, acEdit ή acReadOnly. Η προεπιλογή είναι acEdit. (Προαιρετικός) |
Εκτέλεση ερωτημάτων δράσης με VBA
Μπορείτε να χρησιμοποιήσετε τη μέθοδο DoCmd.RunSQL για να εκτελέσετε ερωτήματα ενεργειών όπως ερωτήματα ενημέρωσης, προσθήκη ερωτημάτων, διαγραφή ερωτημάτων και δημιουργία ερωτημάτων πίνακα. Ο ακόλουθος κώδικας επισυνάπτει μια εγγραφή στον πίνακα:
DoCmd.RunSQL "Insert INTO ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) VALUES (6, 'Product FFF', 'Toys', 10); '
Η σύνταξη της μεθόδου DoCmd.RunSQL είναι:
DoCmd.RunSQL SQL Δήλωση όπου:
SQLStatement - απαιτείται και είναι μια δήλωση SQL που ενημερώνει εγγραφές, προσθέτει εγγραφές, διαγράφει εγγραφές ή δημιουργεί νέο πίνακα.
Σημείωση: Το DoCmd.RunSQL λειτουργεί μόνο με ορισμένες προτάσεις SQL.
