楼上正解
如果你的TIMER要一直工作 而在按下按钮后才执行的话 那就用一个Boolean的全局变量咯
command修改其值 使用timer判断然后执行代码就好了
Option Explicit
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
Private Sub Command4_Click() '按钮4
Timer1.Enabled = True
End Sub
先将timer disable按下command4后在enable