Adgang til VBA - Åbn / luk formular

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.