引用:
作者: mini
IF 區塊裡沒有什麼程式碼
當然就什麼都不會做
你可以放個 msgbox "兩分鐘到了"
看看有沒有反應
|
我改成這樣如下：
Private Sub Timer1_Timer()
Dim NowSecond As Long
NowSecond = (Date - StartDate) * 86400 + Timer
If NowSecond - StartSecond >= 120 Then
Call Command1_Click
Me.WindowState = 0
End If
StartDate = Date
StartSecond = Timer
End Sub
但仍然沒反應=.=