I denne opplæringen lærer vi hvordan du åpner eller lukker Access -skjemaer ved hjelp av VBA.
Åpne et tilgangsskjema
For å åpne et skjema i Access, bruk DoCmd.OpenForm -metoden:
DoCmd.OpenForm "AccessForm"
Dette åpner skjemaet med navnet "AccessForm":

AccessForm vist i navigasjonsruten
Åpne skjema med kriterier
Denne koden åpner et skjema i Access med spesifikke kriterier:
DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"
DoCmd.OpenForm Syntax
Hele syntaksen til metoden er:
DoCmd.OpenForm (NameOfForm, FormView, Filternavn, WhereCondition, DataMode, Vindusmodus, OpenArgs) hvor:
Parameter | Beskrivelse |
---|---|
NameOfForm | Obligatorisk og er navnet på skjemaet du vil åpne. |
FormView | Valgfritt og lar deg spesifisere visningen av skjemaet. Dette kan enten være: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout eller acPreview. Standard er acNormal. |
Filternavn | Valgfritt og lar deg angi navnet på en forespørsel eller SQL -streng som skal brukes som et filter. |
WhereCondition | Valgfritt og lar deg utføre en hvor -type søk uten å bruke ordet hvor. |
DataMode | Valgfritt og lar deg angi datainføringsmodus. Dette kan enten være: acFormAdd, acFormEdit, acFormPropertySettings eller acFormReadOnly. Standard er acFormPropertySettings. |
Vindusmodus | Valgfritt og angir visning av vindusmodus. Dette kan enten være: acDialog, acHidden, acIcon, acWindowNormal. Standard er acWindowNormal. |
OpenArgs | Valgfritt kan refereres til i makroer og uttrykk. |
VBA -programmering | Kodegenerator fungerer for deg!
Lukk et skjema i Access
Bruk DoCmd.Close for å lukke et åpent skjema:
DoCmd.Close acForm, "AccessForm"
Lukk skjema og lagre
Denne VBA -koden lukker og lagrer et Access -skjema:
DoCmd.Close acForm, "AccessForm", acSaveYes
Spør før lukking av skjema
Denne prosedyren vil be brukeren før du lukker et skjema:
Offentlig Sub CloseFormWithConfirmation (FormName As String) Hvis MsgBox ("Er du sikker på at du vil lukke dette vinduet?", VbYesNo + vbQuestion, "Confirmation") = vbYes DoCmd.Close acForm, FormName End If End Sub Sub
Du kan kalle det slik:
Private Sub CloseFormWithConfirmation_Example () Ring CloseFormWithConfirmation ("AccessForm") Avslutt Sub
Lei av å søke etter eksempler på VBA -kode? Prøv AutoMacro!
DoCmd.Close Syntax
Hele syntaksen til metoden er:
DoCmd.Close (ObjectType, Objektnavn, ObjectSave) hvor:
Parameter | Beskrivelse |
---|---|
ObjectType | Valgfritt, og dette er typen objekt du vil lukke. Dette kan være et skjema eller en rapport osv. |
Objektnavn | Valgfritt og er navnet på objektet du vil lukke. |
ObjectSave | Valgfritt og brukes til å angi om du vil lagre endringene. |