このページを共有

# 例：ボタン機能の追加

この例では、アクション名「`Calculator`」で定義されたボタンをユーザがクリックすると、計算機が開きます。ユーザ定義のボタンを追加する詳細については、「ツールバーへのボタンの追加」を参照してください。

`ActionCanExecute` イベント・プロシージャにコードを追加して、ユーザがアクションを開始するとトリガされるようにします。

Wscript.Shell オブジェクトの詳細については、Microsoft のドキュメントを参照してください。VBScript 言語のヘルプを表示するには、スクリプト・エディタで［ヘルプ］＞［VBScript ホーム ページ］を選択します。

    Function ActionCanExecute(ActionName)
            ' 関数の戻り値を初期化して、
    	 ' 予期しない動作を防ぎます。
            ActionCanExecute = DefaultRes
            On Error Resume Next
            If ActionName = "UserDefinedActions.Calculator" Then
                Set shell = CreateObject("Wscript.Shell")
                shell.Run "Calc"
                Set shell = Nothing
            End If
            ActionCanExecute = DefaultRes
            PrintError "ActionCanExecute"
            On Error GoTo 0
    End Function

https://admhelp.microfocus.com ALM 8942
検索結果の改善のヒント... ALM ヘルプセンター ALM ヘルプセンター ALM ヘルプ 17.0 すべてローカル・ヘルプセンターの表示オンライン・ヘルプセンターの表示戻るブラウザ履歴で元に戻る進むブラウザ履歴で前に進む検索の強調表示を解除次のトピック次のトピックに移動前のトピック前のトピックに移動現在のトピックを印刷バージョン: