Re: [VB6 ] 關閉迴圈

看板Visual_Basic作者時間19年前 (2006/03/09 19:36), 編輯推噓3(304)
留言7則, 2人參與, 最新討論串2/2 (看更多)
※ 引述《haibruce (化悲憤為食量)》之銘言: : 我想用一個command按鈕可以當作關閉迴圈的開關 : 但是不知如何寫開關 : 按下去打開迴圈 : 按第二次關閉迴圈 : 第三次打開 : 我有寫出兩個command的程式,但是這樣顯的累贅 : 一個開迴圈,一個關閉迴圈 : 我使用的是do loop迴圈 : 請各位指教 dim bStop as boolean private sub command1_click() bStop=not bStop if not bStop then call yourSub end if end sub private sub yourSub() do until bStop ......... .......... DoEvents '<---這個是重點 Loop end sub ※ 編輯: colawei 來自: 219.80.137.103 (03/09 21:26)

03/10 00:57, , 1F
真的可以,太神奇了,傑克
03/10 00:57, 1F

03/10 11:33, , 2F
要按兩次才會開始,怎麼讓他第一次就打開
03/10 11:33, 2F

03/10 11:37, , 3F
程式啟動時,設bStop=true
03/10 11:37, 3F

03/10 11:53, , 4F
在內部宣告會關不起來,在外部不能宣告
03/10 11:53, 4F

03/10 12:19, , 5F
那是你寫法的問題,不然就宣告成Public
03/10 12:19, 5F

03/10 12:23, , 6F
起始值寫在From_Load()
03/10 12:23, 6F

03/10 12:54, , 7F
瞭解,謝謝指教
03/10 12:54, 7F
文章代碼(AID): #1441DLX1 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #1441DLX1 (Visual_Basic)