FrontPage VBA教程:queryCommandSupported方法

返回 Boolean 类型值,表示当前选择是否支持指定的命令。

expression.queryCommandSupported(cmdID)

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

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

VBA示例

以下示例提示用户输入命令标识符。根据操作的结果向用户显示一条消息。


Sub QueryCommand()
'Determines whether a command is supported
'by the current selection
    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Dim strUser As String
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Prompt user to enter command name.
    strUser = InputBox("Enter a command identifier to be executed.")
    'Run the associated command
    If objDoc.queryCommandSupported(cmdID:=strUser) = True Then
        'If yes - display message.
        MsgBox "The command " & strUser & _
               " is supported by the current selection."
    Else
        'If no - display message.
        MsgBox "The command " & strUser & _
               " is not supported by the current selection."
    End If
End Sub

上页:FrontPage VBA教程:queryCommandState方法 下页:FrontPage VBA教程:queryCommandText方法

FrontPage VBA教程:queryCommandSupported方法

FrontPage VBA教程:queryCommandText方法 FrontPage VBA教程:queryCommandValue方法
FrontPage VBA教程:Quit方法 FrontPage VBA教程:RecalcHyperlinks方法
FrontPage VBA教程:Refresh方法 FrontPage VBA教程:removeBotAttribute方法
FrontPage VBA教程:RemoveChoice方法 FrontPage VBA教程:RemoveWeb方法
FrontPage VBA教程:Run方法 FrontPage VBA教程:Save方法
FrontPage VBA教程:SaveAs方法 FrontPage VBA教程:SaveReport方法
FrontPage VBA教程:setBotAttribute方法 FrontPage VBA教程:toString方法
FrontPage VBA教程:UndoCheckout方法 FrontPage VBA教程:VerifyAllLinks方法
FrontPage VBA教程:Application对象 FrontPage VBA教程:BasicList对象
FrontPage VBA教程:DispFPHTMLDocument对象 FrontPage VBA教程:DocumentLibrary对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号