VBA编程中怎么打开、关闭窗体呢？
窗体操作有两个重要的命令：DoCmd．openform(打开窗体)和DoCmd．Close(关闭窗体)。
用于关闭窗体的Docmd的Close方法有两个必选参数和一个可选参数。可选参数指定要将其关闭的对象的类型。 如果要关闭一个窗体，则使用acForm(是Access的内置常量，使Close方法知道关闭的是一个窗体)。另一个参数指定窗体的名称，即在属性表中“名称”属性的值。可选参数告诉Access是否要保存在窗体上的更改，默认设置为提示是否保存。 使用acSaveYes或acSaveNo来确定关闭窗体时是否要保存。
Close方法的语法为：
Docmd．Close acForm。“窗体...全部
窗体操作有两个重要的命令：DoCmd．openform(打开窗体)和DoCmd．Close(关闭窗体)。
用于关闭窗体的Docmd的Close方法有两个必选参数和一个可选参数。可选参数指定要将其关闭的对象的类型。
如果要关闭一个窗体，则使用acForm(是Access的内置常量，使Close方法知道关闭的是一个窗体)。另一个参数指定窗体的名称，即在属性表中“名称”属性的值。可选参数告诉Access是否要保存在窗体上的更改，默认设置为提示是否保存。
使用acSaveYes或acSaveNo来确定关闭窗体时是否要保存。
Close方法的语法为：
Docmd．Close acForm。“窗体名”，acSaveNo
许多DoCmd方法可直接用于单个对象。
例如，GotoControl方法可将焦点指定给窗体上的一个控件，也可使用SetFocus方法达到同样的效果，即选中一个控件。需要在应用程序中移动焦点以便输入新信息或修改错误信息时，使用这两个方法都很方便。
[例6．113新建一个窗体，放置一个名为“指定窗体”的标签、一个文本框“txt窗体”，再放置两个命令按钮，分别是‘'corn打开”、“corn关闭”，并在窗体模块中编写以下代码：
Option Compare Database
Public forName As String
’声明窗体名称变量，可在模块任何位置引用
Public Sub打开窗体(stDocName As String)
’打开窗体过程
On Error GoTo Err一打开窗体
-
Dim stI．inkCriteria As String
DoCmd．openform stDocName，，，stLinkCriteria’打开指定窗体并获得焦点
Exit一打开窗体：
Exit Sub
Err打开窗体：
MsgBox Err．Description
Resume Exit打开窗体
End Sub
Public Sub关闭窗体(stDocName As String)
’关闭窗体过程。
收起
