I denne vejledning lærer vi, hvordan du åbner eller lukker Access -formularer ved hjælp af VBA.
Åbning af en adgangsformular
For at åbne en formular i Access skal du bruge DoCmd.OpenForm -metoden:
DoCmd.OpenForm "AccessForm"
Dette åbner formularen med navnet "AccessForm":
AccessForm vist i navigationsruden
Åben form med kriterier
Denne kode åbner en formular i Access med specifikke kriterier:
DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"
DoCmd.OpenForm Syntax
Den fulde syntaks for metoden er:
DoCmd.OpenForm (NameOfForm, FormView, Filternavn, Hvor betingelse, DataMode, Vindue-mode, OpenArgs) hvor:
| Parameter | Beskrivelse |
|---|---|
| NameOfForm | Påkrævet og er navnet på den formular, du vil åbne. |
| FormView | Valgfri og giver dig mulighed for at angive visningen af formularen. Dette kan enten være: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout eller acPreview. Standard er acNormal. |
| Filternavn | Valgfrit og giver dig mulighed for at angive navnet på en forespørgsel eller SQL -streng, der skal bruges som et filter. |
| Hvor betingelse | Valgfrit og giver dig mulighed for at foretage en forespørgsel om hvor -type uden at bruge ordet hvor. |
| DataMode | Valgfri og giver dig mulighed for at angive din dataindtastningstilstand. Dette kan enten være: acFormAdd, acFormEdit, acFormPropertySettings eller acFormReadOnly. Standarden er acFormPropertySettings. |
| Vindue-mode | Valgfrit og indstiller visningen af vinduetilstand. Dette kan enten være: acDialog, acHidden, acIcon, acWindowNormal. Standard er acWindowNormal. |
| OpenArgs | Valgfri kan refereres til i makroer og udtryk. |
VBA -programmering | Kodegenerator virker for dig!
Luk en formular i Access
Brug DoCmd.Close for at lukke en åben formular:
DoCmd.Close acForm, "AccessForm"
Luk formularen og gem
Denne VBA -kode lukker og gemmer en adgangsformular:
DoCmd.Close acForm, "AccessForm", acSaveYes
Spørg før lukning af formular
Denne procedure beder brugeren om, før en formular lukkes:
Public Sub CloseFormWithConfirmation (FormName As String) If MsgBox ("Er du sikker på, at du vil lukke dette vindue?", VbYesNo + vbQuestion, "Confirmation") = vbYes Herefter DoCmd.Close acForm, FormName End If End Sub Sub
Du kan kalde det sådan:
Privat sub CloseFormWithConfirmation_Example () Ring til CloseFormWithConfirmation ("AccessForm") Afslut Sub
Træt af at søge efter eksempler på VBA -kode? Prøv AutoMacro!
DoCmd.Close Syntax
Den fulde syntaks for metoden er:
DoCmd.Close (ObjectType, Objektnavn, ObjectSave) hvor:
| Parameter | Beskrivelse |
|---|---|
| ObjectType | Valgfrit, og det er den type objekt, du gerne vil lukke. Dette kan være en formular eller rapport osv. |
| Objektnavn | Valgfrit og er navnet på det objekt, du vil lukke. |
| ObjectSave | Valgfri og bruges til at angive, om du vil gemme de foretagne ændringer. |
