LOOPから抜けるには？

解決

Geek 2004-10-22 01:19:19 No: 86138

たとえば
FOR R = 1 TO 100
R = 50
NEXT
としたときRが100にならないので絶対抜けませんが（応答なしになる）
たとえばある一定の時間がたったら強制的に抜けるやり方って有るのでしょうか
FORMを使って無いPGなのでTIMERなどは使わないで
TimeOutみたいな命令って有るのでしょうか？

ほとんど有りえない文ですが、FOR文でインデックスを足したり引いたりしているので、万が一ループにはまった時の対策です

どうかよい回答をお待ちしています

nanashi 2004-10-22 01:36:07 No: 86139

Timer関数、timeGetTime（API）などで一定時間を計ってやって、それを過ぎたらExit Forすればいいと思います。

batchman 2004-10-22 02:30:33 No: 86140

フォームが無くてもお手軽に使えるタイマーとして．．．

http://www.vector.co.jp/soft/win95/prog/se173965.html

ぴんく 2004-10-22 02:39:43 No: 86141

これはどう！？
FOR R = 1 TO  100
    R = 50
    lngcount=lngcount+1
    if lngcount=100
      exit for
    end if
NEXT

Geek 2004-10-22 02:39:59 No: 86142

無事解決しました
ありがとうございました