不是定時器,button1是回圈發串口命令,想用button2來隨時終止它!!
萬謝!!!
uj5u.com熱心網友回復:
沒人??????????uj5u.com熱心網友回復:
在button1是回圈發串口命令中加一個條件判斷,button2時設那個條件為false....uj5u.com熱心網友回復:
在回圈中,至少要有一句 DoEvents ,這個很重要…………
uj5u.com熱心網友回復:
不用。借助一個公共變數就可以做到:Dim blnStop As Boolean
Private Sub Command1_Click()
blnStop = False
Do Until blnStop
'這里執行你的應用功能
DoEvents '允許其它控制元件操作并檢測系統訊息
Loop
End Sub
Private Sub Command2_Click()
blnStop = True
End Sub
uj5u.com熱心網友回復:
我用的是個for 回圈b = 0
Dim i As Integer
For i = 0 To 35
If b = 1 Then Exit For
End If
Command1(i) = True
Next i
Private Sub Command2_Click()
b = 1
End Sub
這里doevents怎么加進去呢??????????
uj5u.com熱心網友回復:
你這個可能來不及點第二個按鈕就運行完了。
Dim b As Integer
Private Sub Command1_Click()
Dim i As Integer
b = 0
For i = 0 To 35
DoEvents
If b = 1 Then Exit For
Command1(i) = True
Next i
End Sub
Private Sub Command2_Click()
b = 1
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/131258.html
標籤:VB基礎類
上一篇:IC卡怎么連續讀寫兩個塊區資料
下一篇:關于VB讀取網頁表格資料
