execCommand 方法

       

执行指定的命令并返回表明搜索结果的 Boolean 值。

expression.execCommand(cmdID, showUI, value)

expression  必选。返回“应用于”列表中的对象之一的表达式。

cmdID  必选。String 类型。代表指定参数的命令标识符。

showUI  可选。Boolean 类型。指定与该命令相关联的用户界面是否会显示。默认值为 False

value  可选。Variant 类型。指定与 cmdID 参数相关联的任何附加参数。

示例

下列示例删除当前所选内容,并返回存储命令结果的 Boolean 值。

Sub ExecCmd()
'Executes a command based on the specified
'parameters

     Dim objApp As FrontPage.Application
     Dim objDoc As DispFPHTMLDocument
     Dim blnSuccess as Boolean

     Set objApp = FrontPage.Application
     Set objDoc = objApp.ActiveDocument
     'Delete the current selection.
     blnSuccess = objDoc.execCommand (cmdID:="Delete")

End Sub

下列示例将当前所选内容的字体更改为 Arial,如果成功,则返回 TrueshowUI 参数设为 False,这意味着关联的用户界面不会显示。

     blnSuccess = objDoc.execCommand (cmdID:="FontName",
                         _ ShowUI:=False, Value:=arial)