VBA编程中怎么打开?

成数国际_主机资讯 2022-03-20 07:14 编辑:胡辉 299阅读

  窗体操作有两个重要的命令: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)

’关闭窗体过程。