În acest tutorial, vom învăța cum să deschidem sau să închidem formulare Access folosind VBA.
Deschiderea unui formular de acces
Pentru a deschide un formular în Access, utilizați metoda DoCmd.OpenForm:
DoCmd.OpenForm "AccessForm"
Astfel se va deschide formularul numit „AccessForm”:
AccessForm afișat în panoul de navigare
Formular deschis cu criterii
Acest cod va deschide un formular în Access cu criterii specifice:
DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"
Sintaxa DoCmd.OpenForm
Sintaxa completă a metodei este:
DoCmd.OpenForm (NameOfForm, FormView, FilterName, În cazul în care condiția, DataMode, Modul fereastră, OpenArgs) Unde:
| Parametru | Descriere |
|---|---|
| NameOfForm | Obligatoriu și este numele formularului pe care doriți să îl deschideți. |
| FormView | Opțional și vă permite să specificați vizualizarea formularului. Acest lucru poate fi: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout sau acPreview. Valoarea implicită este acNormal. |
| FilterName | Opțional și vă permite să specificați numele unei interogări sau a unui șir SQL de utilizat ca filtru. |
| UndeCondiție | Opțional și vă permite să efectuați o interogare de tip unde fără a utiliza cuvântul unde. |
| DataMode | Opțional și vă permite să specificați modul de introducere a datelor. Aceasta poate fi: acFormAdd, acFormEdit, acFormPropertySettings sau acFormReadOnly. Implicit este acFormPropertySettings. |
| Modul fereastră | Opțional și setează afișarea modului Window. Acesta poate fi: acDialog, acHidden, acIcon, acWindowNormal. Valoarea implicită este acWindowNormal. |
| OpenArgs | Opțional poate fi menționat în macrocomenzi și expresii. |
Programare VBA | Generatorul de coduri funcționează pentru dvs.!
Închideți un formular în Access
Utilizați DoCmd.Close pentru a închide un formular deschis:
DoCmd.Close acForm, "AccessForm"
Închideți formularul și salvați
Acest cod VBA se va închide și va salva un formular de acces:
DoCmd.Close acForm, "AccessForm", acSaveYes
Solicitați înainte de închiderea formularului
Această procedură va solicita utilizatorului înainte de a închide un formular:
Public Sub CloseFormWithConfirmation (FormName As String) Dacă MsgBox („Sunteți sigur că doriți să închideți această fereastră?”, VbYesNo + vbQuestion, „Confirmation”) = vb Da DoCmd.Close acForm, FormName End If End Sub
Îl poți numi astfel:
Private Sub CloseFormWithConfirmation_Example () Apelați CloseFormWithConfirmation ("AccessForm") Finalizați sub
V-ați săturat să căutați exemple de cod VBA? Încercați AutoMacro!
DoCmd.Închideți sintaxa
Sintaxa completă a metodei este:
DoCmd.Close (ObjectType, ObjectName, ObjectSave) Unde:
| Parametru | Descriere |
|---|---|
| ObjectType | Opțional și acesta este tipul de obiect pe care doriți să îl închideți. Acesta poate fi un formular sau un raport etc. |
| ObjectName | Opțional și este numele obiectului pe care doriți să îl închideți. |
| ObjectSave | Opțional și este utilizat pentru a specifica dacă doriți să salvați modificările făcute. |
