现在程序里有两个按钮我希望在程序启动时,自动点下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