用VB模拟交通信号灯

发布网友发布时间：2022-05-01 19:10

共1个回答

热心网友时间：2022-06-21 17:09

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

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com