※ 引述《yantchen (球童Yanting)》之銘言：
: ※ 引述《jujuo (我是一雙魚~)》之銘言：
: : 寫了一個條件判斷式去延遲一段時間執行副程式
: : ===========================
: : '屬性設定
: : 'Timer1.Enable = False
: : 'Timer1.Intervel = 0
: : ===========================
: : if xxxx then
: : Timer1.Enable = True
: : End if
: : -----------------------------
: : Private sub Timer1.timer
: : Timer.Intervel = (a/b - c*100)*1000
: : start '副程式
: : Timer.Enable = False
: : End sub
: : ------------------------------
: : 因為我想要延遲的時間是一段數學運算式
: : 而且此時間大於65秒
: : 請問要怎麼修改程式呢?@@
: : 請大家幫幫我Q_Q
: 不太懂你的意思
: 你現在是要讓(a/b-c*100)*1000=65嗎?
不是耶~是這一段延遲時間是個變數
也就是非固定的 他的變數值來自於上面那段數學式子
但我知道Timer的Intervel最多只能設到65536約65秒
可是我的延遲時間經由數學式子算出大於65秒
所以想問問看是否有解決的辦法
: 如果你要延遲的話
: 不用timer物件 用timer函數就好
是說不必放Timer物件上去嗎?(小時鐘那個)
那如果沒放 怎麼設定此Timer函數的開關?
因為我的程式流程是
條件判斷->True->啟動Timer->延遲時間啟動副程式->關閉Timer(如此循環)
感謝解惑!!
: t=timer '紀錄現在時間
: do
: doevents '讓VB跑其他物件的程式碼
: loop until timer>t+65
: '延遲65秒以後繼續下面的程式
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.109.40.60