Πρόσβαση στο VBA - Άνοιγμα / Κλείσιμο φόρμας

Σε αυτό το σεμινάριο, θα μάθουμε πώς να ανοίγουμε ή να κλείνουμε φόρμες πρόσβασης χρησιμοποιώντας VBA.

Άνοιγμα φόρμας πρόσβασης

Για να ανοίξετε μια φόρμα στην Access, χρησιμοποιήστε τη μέθοδο DoCmd.OpenForm:

DoCmd.OpenForm "AccessForm"

Αυτό θα ανοίξει τη φόρμα που ονομάζεται "AccessForm":

AccessForm Εμφανίζεται στο παράθυρο περιήγησης

Άνοιγμα φόρμας με κριτήρια

Αυτός ο κωδικός θα ανοίξει μια φόρμα στην Access με συγκεκριμένα κριτήρια:

DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"

DoCmd.OpenForm Syntax

Η πλήρης σύνταξη της μεθόδου είναι:

DoCmd.OpenForm (ΌνομαOfForm, FormView, Όνομα φίλτρου, WhereCondition, DataMode, WindowMode, OpenArgs) όπου:

Παράμετρος	Περιγραφή
NameOfForm	Απαιτείται και είναι το όνομα της φόρμας που θέλετε να ανοίξετε.
FormView	Προαιρετικό και σας επιτρέπει να καθορίσετε την προβολή της φόρμας. Αυτό μπορεί να είναι: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout ή acPreview. Η προεπιλογή είναι acNormal.
Όνομα φίλτρου	Προαιρετικό και σας επιτρέπει να καθορίσετε το όνομα ενός ερωτήματος ή συμβολοσειράς SQL που θα χρησιμοποιηθεί ως φίλτρο.
WhereCondition	Προαιρετικό και σας επιτρέπει να πραγματοποιήσετε ένα ερώτημα τύπου where χωρίς να χρησιμοποιήσετε τη λέξη where.
DataMode	Προαιρετικό και σας επιτρέπει να καθορίσετε τη λειτουργία εισαγωγής δεδομένων. Αυτό μπορεί να είναι: acFormAdd, acFormEdit, acFormPropertySettings ή acFormReadOnly. Η προεπιλογή είναι acFormPropertySettings.
WindowMode	Προαιρετικό και ορίζει την εμφάνιση της λειτουργίας παραθύρου. Αυτό μπορεί να είναι: acDialog, acHidden, acIcon, acWindowNormal. Η προεπιλογή είναι acWindowNormal.
OpenArgs	Το προαιρετικό μπορεί να αναφέρεται σε μακροεντολές και εκφράσεις.

Προγραμματισμός VBA | Το Code Generator λειτουργεί για εσάς!

Κλείστε μια φόρμα στην Access

Χρησιμοποιήστε το DoCmd.Close για να κλείσετε μια ανοιχτή φόρμα:

DoCmd.Close acForm, "AccessForm"

Κλείστε τη φόρμα και αποθηκεύστε

Αυτός ο κωδικός VBA θα κλείσει και θα αποθηκεύσει μια φόρμα πρόσβασης:

DoCmd.Close acForm, "AccessForm", acSaveYes

Ερώτηση πριν από το κλείσιμο της φόρμας

Αυτή η διαδικασία θα ζητήσει από τον χρήστη πριν κλείσει μια φόρμα:

Public Sub CloseFormWithConfirmation (FormName As String) If MsgBox ("Είστε βέβαιοι ότι θέλετε να κλείσετε αυτό το παράθυρο;", vbYesNo + vbQuestion, "Confirmation") = vbΝαι Τότε DoCmd.Close acForm, FormName End If End Sub

Μπορείτε να το ονομάσετε ως εξής:

Private Sub CloseFormWithConfirmation_Example () Call Call CloseFormWithConfirmation ("AccessForm") End Sub

Κουραστήκατε να ψάχνετε για παραδείγματα κώδικα VBA; Δοκιμάστε το AutoMacro!

DoCmd. Κλείσιμο σύνταξης

Η πλήρης σύνταξη της μεθόδου είναι:

DoCmd. Close (ObjectType, Όνομα αντικειμένου, Αποθήκευση αντικειμένου) όπου:

Παράμετρος	Περιγραφή
ObjectType	Προαιρετικό και αυτός είναι ο τύπος αντικειμένου που θα θέλατε να κλείσετε. Αυτό μπορεί να είναι μια φόρμα ή μια αναφορά κλπ.
Όνομα αντικειμένου	Προαιρετικό και είναι το όνομα του αντικειμένου που θέλετε να κλείσετε.
Αποθήκευση αντικειμένου	Προαιρετικό και χρησιμοποιείται για να καθορίσει εάν θέλετε να αποθηκεύσετε τις αλλαγές που έγιναν.