Excel中VBA doub traffic lights信号灯模拟设计

1、以下是Excel中，双向红绿信号灯的模拟显示图，当前初始状态，南北向红灯等待66秒，东西向绿灯直行放行30秒；

2、红绿信号灯运行模拟效果如下，一个周期依次是东西向直行绿灯，左转红灯，东西向直行黄灯，左转红灯，东西向直行红灯，左转绿灯，东西向直行红灯，左转黄灯，东西向直行红灯，左转红灯，南北向与之对应；

3、如下VBA代码1st；

4、如下VBA代码2nd；

5、如下VBA代码3rd；

6、如下VBA代码4th；

7、如下VBA代码5th；

8、如下VBA代码6th；

9、如下VBA代码7th；

10、如下VBA代码8th；

11、如下VBA代码9th；