1

以下のコードは一目瞭然です (ctrl-numADD キーの組み合わせを送信)。しかし、私は明らかに何か間違ったことをしています。以下のコードから生成される完全なエラーは次のとおりです。

Line: 4
Char: 1
Error:  Invalid procedule call or argument
Code: 800A005

エラーを生成せずにこのキーの組み合わせを送信するにはどうすればよいですか?

PS: コードは、sendkeys を実行する前に、少なくともフォーカスを正しいウィンドウに変更できます。

 Dim WshellObj   
 set WshShell = WScript.CreateObject("WScript.Shell")   
 WshShell.AppActivate "Logs"   
 WshShell.SendKeys "^{ADD}"
4

1 に答える 1

0

特定のエラーが発生する理由はわかりませんが、SendKeys メソッドで無効なキー シーケンスを使用しようとしています。「{ADD}」は有効なコードではありません。

代わりにこれを使用する必要があります。

Dim WshellObj
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Logs"
WshShell.SendKeys "^+"

これにより、+ 記号が送信されます。SendKeys は、テンキー固有のキーをサポートしていません。

于 2012-04-11T15:35:17.270 に答える