【Access基础】OpenForm打开窗体方法详解【Access软件网】 您所在的位置:网站首页 access刷新窗体代码 【Access基础】OpenForm打开窗体方法详解【Access软件网】

【Access基础】OpenForm打开窗体方法详解【Access软件网】

2023-09-15 07:35| 来源: 网络整理| 查看: 265

时 间:2020-06-11 08:01:25 作 者:name   ID:63090  城市:临汾 摘 要:对openform方法中的相关参数进行详解。 正 文:

    expression.OpenForm(FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs)

    括号内的都是openform方法的相关参数,有些参数是必需指定,有些参数可选。

    expression 必需 返回“应用于"”列表中的一个对象的表达式。在access中是指docmd对象

    FormName 必需 Variant (变量)型,既可以直接指定窗体的名称也可以是变量

        假设有一个窗体名称为”窗体A”

        Docmd.openform“窗体A”就是打开 “窗体A”

        下面的是通过变量打开 “窗体A'

        Dim strFormName as string

        StrFormName=”窗体A”

        Docmd.openform StrFormName

    View 可选 是指窗体的视图模式,如果将该参数留空默认是acNormal,可用常量如下

        acDesign    指窗体以设计模式打开

        acFormDS    指窗体以数据表模式打开         acFormPivotChart    指窗体以数据透视图模式打开         acFormPivotTable    指窗体以数据透视表模式打开         acNormal    默认。在“窗体”视图中打开窗体。         acPreview    以预览模式打开窗体。         假设有一个窗体名称为”窗体A”

        Docmd.openform “窗体A", acNormal    就是打开“窗体A”

    FilterName 可选Variant(变量)型,代表当前数据库中查询的有效名称。

    WhereCondition 可选Variant 型。字符串表达式,表示不包括词Where的有效查询条件

        假设有一个窗体名称为”窗体A”         Docmd.openform “窗体A", acFormDS, ,”姓名='张三”    就是以数据表模式打开 “窗体A”并且只显示窗体中姓名是张三的记录     DataMode 可选,窗体的数据输入模式。它只应用于在“窗体”视图或“数据表"视图中打开的窗体。如果将该参数留空默认就是acFormPropertySettings,可用的常量如下:         acFormAdd用户可以添加新记录,但是不能编辑现有记录。         acFormEdit用户可以编辑现有记录和添加新记录。         acFormPropertySettings默认         acFormReadOnly用户只能查看记录。         假设有一个窗体名称为”窗体A”         Docmd.openform “窗体A”,,,”姓名='张三”,acFormReadOnly    是指以只读方式打开“窗体A”,窗体不能添加修改,并且只显示窗体中姓名是张三的记录,     WindowMode 可选, 打开窗体时所采用的窗口模式,可用常量如下

        acDialog    窗体的Modal 和PopUp 属性设为“是”。         acHidden    窗体隐藏。         acIcon    打开窗体并在Windows 工具栏中最小化。         acWindowNormal    默认值窗体采用它的属性所设置的模式如果将该参数留空,将假定为默认常量(acWindowNormal)。     OpenArgs 可选 Variant 型。字符串表达式,可用来给打开的窗体传递参数。         假设有一个窗体名称为”窗体A”         DoCmd.OpenForm "窗体A.",...,“大家好”    是指打开窗体A,并给窗体传递参数值”大家好”

        Private Sub Form Load()

            Dim strOpen as string

            strOpen = Me.OpenArgs

            MsgBox strOpen         End Sub

Access软件网QQ交流群 (群号:150401543)       Access源码网店


【本文地址】

公司简介

联系我们

今日新闻

    推荐新闻

    专题文章
      CopyRight 2018-2019 实验室设备网 版权所有