Достъп до VBA - отваряне / затваряне на формуляр

В този урок ще научим как да отваряте или затваряте формуляри за достъп с помощта на VBA.

Отваряне на формуляр за достъп

За да отворите формуляр в Access, използвайте метода DoCmd.OpenForm:

DoCmd.OpenForm "AccessForm"

Това ще отвори формуляра, наречен „AccessForm“:

AccessForm, показан в навигационния екран

Отворете формуляр с критерии

Този код ще отвори формуляр в Access със специфични критерии:

DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"

DoCmd.OpenForm Синтаксис

Пълният синтаксис на метода е:

DoCmd.OpenForm (NameOfForm, FormView, FilterName, Къде Състояние, Режим на данни, В прозорец, OpenArgs) където:

Параметър	Описание
NameOfForm	Задължително и е името на формуляра, който искате да отворите.
FormView	По избор и ви позволява да посочите изгледа на формуляра. Това може да бъде: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout или acPreview. По подразбиране е acNormal.
FilterName	По избор и ви позволява да посочите името на заявка или SQL низ, който да използвате като филтър.
Къде Състояние	По избор и ви позволява да провеждате заявка тип тип, без да използвате думата къде.
Режим на данни	По избор и ви позволява да посочите вашия режим на въвеждане на данни. Това може да бъде: acFormAdd, acFormEdit, acFormPropertySettings или acFormReadOnly. По подразбиране е acFormPropertySettings.
В прозорец	По избор и задава показване на режим Window. Това може да бъде: acDialog, acHidden, acIcon, acWindowNormal. По подразбиране е acWindowNormal.
OpenArgs	Незадължителните могат да бъдат посочени в макроси и изрази.

VBA програмиране | Code Generator работи за вас!

Затворете формуляр в Access

Използвайте DoCmd.Close, за да затворите отворена форма:

DoCmd.Close acForm, "AccessForm"

Затворете формуляра и запазете

Този VBA код ще затвори и запази формуляр за достъп:

DoCmd.Close acForm, "AccessForm", acSaveДа

Подканете преди затваряне на формуляра

Тази процедура ще подкани потребителя, преди да затвори формуляр:

Public Sub CloseFormWithConfirmation (FormName As String) Ако MsgBox ("Сигурни ли сте, че искате да затворите този прозорец?", VbYesNo + vbQuestion, "Confirmation") = vbДа След това DoCmd.Close acForm, FormName End If End Sub

Можете да го наречете така:

Частен под CloseFormWithConfirmation_Example () Обадете се CloseFormWithConfirmation ("AccessForm") End Sub

Уморени ли сте от търсене на примери за VBA код? Опитайте AutoMacro!

DoCmd.Close Синтаксис

Пълният синтаксис на метода е:

DoCmd.Close (ObjectType, ObjectName, ObjectSave) където:

Параметър	Описание
ObjectType	По избор и това е типът обект, който искате да затворите. Това може да бъде формуляр или отчет и т.
ObjectName	По избор и е името на обекта, който искате да затворите.
ObjectSave	По избор и се използва, за да посочите дали искате да запазите направените промени.