キーF1が押されたらプログラムを終了したい。do while ループの書き方がわからない。何か案は？
Set WshShell = WScript.CreateObject("WScript.Shell")
Do While {F1} is not pressed
'...
Loop
質問する
17198 次
2 に答える
4
これはプレーンな VBScript では不可能ですが、 HTAで動作させることができる場合があります。
<head>
<title>Test</title>
<HTA:APPLICATION ID="oHTA"
APPLICATIONNAME="Test"
>
</head>
<script language="VBScript">
Sub CheckKey
If window.event.keyCode = 112 Then self.close()
End Sub
</script>
<body onKeyUp="CheckKey">
...
</body>
于 2013-04-25T10:53:44.173 に答える