全部显示

RunCommand 方法

       

RunCommand 方法用于执行内置菜单命令或内置工具栏命令。

expression.RunCommand(Command)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

Command  AcCommand,必需。固有常量,指定要执行的内置菜单命令或内置工具栏命令。

说明

Microsoft Access 中的每个菜单命令和工具栏命令都有一个相关的常量,在 Visual Basic 中,可以将常量与 RunCommand 方法结合使用来执行该常量对应的命令。

不能使用 RunCommand 方法执行自定义菜单或工具栏上的命令,该方法只能用于内置菜单和工具栏。

RunCommand 方法可替换 DoCmd 对象的 DoMenuItem 方法。

示例

下面的示例使用 RunCommand 方法打开“选项”对话框(“工具”菜单)。

Public Function OpenOptionsDialog() As Boolean

On Error GoTo Error_OpenOptionsDialog

    DoCmd.RunCommand acCmdOptions
    OpenOptionsDialog = True

Exit_OpenOptionsDialog:
    Exit Function

Error_OpenOptionsDialog:
    MsgBox Err & ": " & Err.Description
    OpenOptionsDialog = False
    Resume Exit_OpenOptionsDialog

End Function