VB编写红绿灯切换小程序

1、打开VB界面，建立标准EXE工程。

2、利用图形控件在窗体上画上三个圆，并涂上红色，黄色，绿色。名称分别改为S1，S2，S3。

3、在窗体上建立两个命令按钮，caption分别改为切换红绿灯，退出。名称改为A，B。

4、点击窗体，进入代码编辑器。S2.Visible = FalseS3.Visible = False

5、点击切换红绿灯按钮，旅邯佤践进入代码编辑器。If S1.Visible = True Then S2.Visible = Tru髫潋啜缅e S1.Visible = FalseElseIf S2.Visible = True Then S3.Visible = True S2.Visible = False S1.Visible = False Else S1.Visible = True S3.Visible = False S2.Visible = False End If

6、点击退出按钮，进入代码编辑器，end

7、现在运行测试一下，

8、点击切换红绿灯，

9、按退出按钮退出。