您的方式應該會佔資源.....??
我是要知道timestock 是否正在跑 ?
if ..timestock 正在跑 then............ 語法????
想要攔截就在 module 放一個
Public Sub AAA( 正在跑 )
If 正在跑 Then
Else
End if
End Sub
...
bobomi 發表於 2014-10-17 19:47
Sub timestock()
Call AAA ( True ) ' 放在 Application.OnTime The_Time, "timestock" 之前
my = #1 ...
bobomi 發表於 2014-10-17 20:11
1. 是否可以說明這個程式的用意為何?
如此才能真正幫你達到,你想要追求的效果。
3. 建議你可以設立2個按鈕【程式開始啟動】與【程式停止】會比較好。
因為有關於時間,程式的寫法都是要即時更近的,就會發生你這種”程式停不下來”的窘境。
Sub IE345678()
If Not Ie Is Nothing Then
MsgBox "IE345678 已執行"
Exit Sub
End If
...
bobomi 發表於 2014-10-18 08:23
要求 99% 準時就這樣
Sub IE345678()
If Not IE Is Nothing Then
Application.OnTime The_Time + ...
bobomi 發表於 2014-10-18 08:31
my = #12:01:00 AM#
是不是這問題 ??上午跑沒問題,下午循還2-3次會跳出??
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/) |