VBA编程中打开、关闭窗体
 在一个程序中往往包含多个窗体,窗体在程序中用代码互相关联,形成了一个有机的整体;可见,窗体操作在VBA中是很重要的。
  窗体操作有两个重要的命令: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
vba编程技巧
  Err打开窗体:
  MsgBox Err.Description
  Resume Exit打开窗体
  End Sub
  Public Sub关闭窗体(stDocName As String) ’关闭窗体过程

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。