WSH/Do...Loopのループから抜ける方法
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
開始行:
#navi(../)
* VBScriptのDo...Loopのループから抜ける方法 [#k9a2bb46]
Do...Loopを使って無限ループから抜けるコードの記述方法を以...
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連資料 [#n120f006]
-[[VBスクリプトを中断する方法>WSH/スクリプトを中断する方...
* Do...Loopからの無限ループを抜ける方法 [#s611bd80]
Do...Loopから抜けるコードは以下の記述になります。
Exit Do
実際にInputboxを使用しキャンセルボタンが押されるまで無限...
* Exit Doのサンプルスクリプト [#s210dc1d]
#ref(exitdo.vbs)
Dim ret
Do
ret = InputBox("入力してください。")
If IsEmpty(ret) Then 'Push Cancel button
Exit Do
End If
MsgBox(ret)
Loop
上記のVBスクリプトを起動すると、以下の画面が表示されます。~
文字を入力しOKボタンを押すと、メッセージボックスに入力さ...
OKボタンを押すと再度Inputboxが処理され入力を促されます。~
キャンセルボタンを押すと、Exit Doが動作しDo...Loopから抜...
#ref(01.gif)
以上、VBスクリプトで無限ループから抜けるExit Doの使用方法...
#htmlinsertpcsp(win-btm.html,win-sp.html)
終了行:
#navi(../)
* VBScriptのDo...Loopのループから抜ける方法 [#k9a2bb46]
Do...Loopを使って無限ループから抜けるコードの記述方法を以...
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連資料 [#n120f006]
-[[VBスクリプトを中断する方法>WSH/スクリプトを中断する方...
* Do...Loopからの無限ループを抜ける方法 [#s611bd80]
Do...Loopから抜けるコードは以下の記述になります。
Exit Do
実際にInputboxを使用しキャンセルボタンが押されるまで無限...
* Exit Doのサンプルスクリプト [#s210dc1d]
#ref(exitdo.vbs)
Dim ret
Do
ret = InputBox("入力してください。")
If IsEmpty(ret) Then 'Push Cancel button
Exit Do
End If
MsgBox(ret)
Loop
上記のVBスクリプトを起動すると、以下の画面が表示されます。~
文字を入力しOKボタンを押すと、メッセージボックスに入力さ...
OKボタンを押すと再度Inputboxが処理され入力を促されます。~
キャンセルボタンを押すと、Exit Doが動作しDo...Loopから抜...
#ref(01.gif)
以上、VBスクリプトで無限ループから抜けるExit Doの使用方法...
#htmlinsertpcsp(win-btm.html,win-sp.html)
ページ名: