Private Sub Form_Load()
Timer1.Interval = 60000
Timer2.Interval = 60000
End SubPrivate Sub Timer1_Timer()
Me.BackColor = RGB(0, 255, 0)
Timer2.Enabled = True
Timer1.Enabled = False
End SubPrivate Sub Timer2_Timer()
Me.BackColor = RGB(255, 0, 0)
Timer1.Enabled = True
Timer2.Enabled = False
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024