V tomto návode sa naučíme, ako otvárať alebo zatvárať formuláre Access pomocou VBA.
Otvorenie prístupového formulára
Na otvorenie formulára v Accesse použite metódu DoCmd.OpenForm:
DoCmd.OpenForm "AccessForm"
Otvorí sa formulár s názvom „AccessForm“:
AccessForm je zobrazený na navigačnej table
Otvorený formulár s kritériami
Tento kód otvorí v Accesse formulár so špecifickými kritériami:
DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"
Syntax DoCmd.OpenForm
Úplná syntax metódy je:
DoCmd.OpenForm (NameOfForm, FormView, FilterName, WhereCondition, DataMode, Režim okna, OpenArgs) kde:
| Parameter | Popis |
|---|---|
| NameOfForm | Vyžaduje sa a je to názov formulára, ktorý chcete otvoriť. |
| FormView | Voliteľné a umožňuje určiť pohľad na formulár. Môže to byť: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout alebo acPreview. Predvolená hodnota je acNormal. |
| FilterName | Voliteľné a umožňuje zadať názov dotazu alebo reťazca SQL, ktorý sa má použiť ako filter. |
| WhereCondition | Voliteľné a umožňuje vám vykonať dotaz typu kde bez použitia slova kde. |
| DataMode | Voliteľné a umožňuje vám určiť režim zadávania údajov. Môže to byť: acFormAdd, acFormEdit, acFormPropertySettings alebo acFormReadOnly. Predvolená hodnota je acFormPropertySettings. |
| Režim okna | Voliteľné a nastavuje zobrazenie režimu Okno. Môže to byť: acDialog, acHidden, acIcon, acWindowNormal. Predvolená hodnota je acWindowNormal. |
| OpenArgs | Na voliteľné položky je možné odkazovať v makrách a výrazoch. |
Programovanie VBA | Generátor kódu pracuje za vás!
Zatvorte formulár v programe Access
Na zatvorenie otvoreného formulára použite DoCmd.Close:
DoCmd.Close acForm, "AccessForm"
Zatvorte formulár a uložte
Tento kód VBA sa zatvorí a uloží prístupový formulár:
DoCmd.Close acForm, "AccessForm", acSaveYes
Výzva pred zatvorením formulára
Tento postup vyzve užívateľa pred zatvorením formulára:
Public Sub CloseFormWithConfirmation (FormName As String) If MsgBox („Si si istý, že chceš zavrieť toto okno?“, VbYesNo + vbQuestion, „Confirmation“) = vbYes Then DoCmd.Close acForm, FormName End If End Sub
Môžete to nazvať takto:
Súkromná čiastková CloseFormWithConfirmation_Example () Zavolať CloseFormWithConfirmation ("AccessForm") Koniec Sub
Ste unavení z hľadania príkladov kódu VBA? Skúste AutoMacro!
DoCmd.Close Syntax
Úplná syntax metódy je:
DoCmd.Close (ObjectType, ObjectName, ObjectSave) kde:
| Parameter | Popis |
|---|---|
| ObjectType | Voliteľné a toto je typ objektu, ktorý by ste chceli zavrieť. Môže to byť formulár alebo správa atď. |
| ObjectName | Voliteľné a je názov objektu, ktorý chcete zavrieť. |
| ObjectSave | Voliteľné a slúži na určenie, či chcete vykonané zmeny uložiť. |
