現在程序里有兩個按鈕我希望在程序啟動時,自動點下Command2,然后過10-20秒點Command1之后每8.1個小時[換算:29160秒]自動運行上述的動作請高手把代碼寫好發上來,新手^_^,你光說思路沒人看得懂

熱心網友

你需要兩個TimerTimer1的Interval設置為10-20Timer2的設置為29160然后設置它們的Enabled屬性為FalseSub Form_Load Command2_Click Timer1。Enabled=TrueEnd SubSub Timer1_Timer() Timer1。Enabled=False Command1_Click Timer2。Enabled=TrueEnd SubSub Timer2_Timer() Timer2。Enabled=False Form_LoadEnd Sub嗯，我知道錯誤了，不好意思把Timer2的Interval設置為1000下面是改正后的代碼Private lTimer2 as longSub Form_Load Command2_Click Timer1。Enabled=TrueEnd SubSub Timer1_Timer() Timer1。Enabled=False Command1_Click Timer2。Enabled=TrueEnd SubSub Timer2_Timer lTimer2=lTimer2+1 if lTimer2=29160 then Timer2。Enabled=False Form_Load lTimer2=0 End if End Sub。

熱心網友

比較簡單的程序,照著代碼,你能把界面設計出來嗎?

熱心網友

上面的程序需要一定的改動，這個定時器是以毫秒為單位的，所以設定值需要乘1000