看板 [ Visual_Basic ]
討論串[VB6 ] 跳出無窮迴圈
共 5 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#5
Re: [VB6 ] 跳出無窮迴圈
推噓2(2推 0噓 2→)留言4則，0人參與, 最新作者fumizuki (矇面加菲獅)時間16年前 (2009/10/04 15:24), 編輯資訊
0
0
0
內容預覽:
模組開頭宣告一個變數記錄是否要停止程式的執行，迴圈中檢查這個變數. Private bStop As Boolean. Private Sub 讀取資料(). Do. '此處是你讀取資料的程式碼. If bStop Then bStop = False: Exit Sub '當變數值為True就離開
(還有455個字)
#4
Re: [VB6 ] 跳出無窮迴圈
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者sask (sask)時間16年前 (2009/10/04 09:16), 編輯資訊
0
0
0
內容預覽:
藉這個討論串延伸問一個問題. 我現在每隔一段時間就要從Com1上讀取資料. 但想寫一個取消按鈕 也就是按下去後就全部停止 跳出迴圈. 請問這個按鈕要怎麼寫呢 感謝~. --. 我我受不了你我決定要跟你分手原先我以為我是被夾在幸福和痛苦之間後來發現我是被排在幸福和痛苦之外雖然追求的本身就是一種收穫付出
#3
Re: [VB6 ] 跳出無窮迴圈
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者fumizuki (矇面加菲獅)時間18年前 (2007/06/18 13:39), 編輯資訊
0
0
0
內容預覽:
參考精華區 z,12,3,5 GetTickCount 可取得計數器時間. (timeGetTime會比GetTickCount精準一點，用法相同). vb亦有提供 Timer函數，不過只能傳回當日的秒數而已. 迴圈前. StartTime = timeGetTime(). 迴圈裡. If (tim
(還有181個字)
#2
Re: [VB6 ] 跳出無窮迴圈
推噓0(0推 0噓 1→)留言1則，0人參與, 最新作者windwofswold ( ◤〔ζ狼ζ〕◢)時間18年前 (2007/06/18 01:35), 編輯資訊
0
0
0
內容預覽:
那就用計時器裡面的方法寫吧.... 加個count還有判斷Comm1的方法. 這樣就OK啦:). --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 61.63.98.16.
#1
[VB6 ] 跳出無窮迴圈
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者kunhui (埃柏龍)時間18年前 (2007/06/18 00:46), 編輯資訊
0
0
0
內容預覽:
我寫了一個迴圈用來等待Com1上的資料. Do Until Comm1.InBufferCount > 0. DoEvents. Loop. 正常情況下是沒有問題的. 但是萬一因為干擾導致對方沒回應時我的程式會當在那邊. 我想要寫一個計時器在裡面 當進入迴圈就開始計時. 當等待T時後若還沒收到資料則
首頁
上一頁
1
下一頁
尾頁