养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

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

时间:2024-11-12 19:07:14

提到红绿信号灯,想必都了解它的基本皤材装肢工作过程,一个方向直行和左转都是红灯时,另一个方向则显示直行绿灯,左转红灯,接着直行红灯,左转绿灯,然后两个方向互换。假如更复杂些,还有右茌慊瑞谷转红绿灯的设置规则问题了。在此,详细叙述下,在Excel中,利用VBA编程,设计双向红绿信号灯模拟运行一个周期的流程步骤。

工具/原料

Excel中VBAdoubletrafficlights红绿信号灯模拟设计流程

DimmosquitAsBoolean

DoWhilemosquit=False

mosstart=Timer

DoWhileTimer

DoEvents

WithSelection.Font

.Color=?

.TintAndShade=0

方法/步骤

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

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

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

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

3、如下VBA代码1st;

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

4、如下VBA代码2nd;

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

5、如下VBA代码3rd;

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

6、如下VBA代码4th;

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

7、如下VBA代码5th;

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

8、如下VBA代码6th;

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

9、如下VBA代码7th;

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

10、如下VBA代码8th;

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

11、如下VBA代码9th;

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

© 一点知识