漆黑的魅影5.0催眠术:求救啊！！如何用vb控制三色交通灯进行切换，给代码吧

来源：百度文库 编辑：高校问答 时间：2024/05/07 16:10:02
一个按钮控制，在一个灯上显示三种状态，进行切换

Option Explicit
Dim a As Byte

Private Sub Command1_Click()
a = a + 1
If a = 1 Then
Shape1.FillColor = vbRed
ElseIf a = 2 Then
Shape1.FillColor = vbYellow
ElseIf a = 3 Then
Shape1.FillColor = vbGreen
ElseIf a = 4 Then
Shape1.FillColor = vbYellow
ElseIf a > 4 Or a = 1 Then
a = a - 4
Shape1.FillColor = vbRed
End If
End Sub

求救啊！！如何用vb控制三色交通灯进行切换，给代码吧 如何用8253和8255芯片设计交通灯控制方案？ 急救！ vb编程：如何用一个按钮控制红黄绿三个灯进行切换 如何用vb控制交换机呼出限制？ 如何用VB控制首字符延迟时间？ 如何用vb控制视频捕捉卡 如何用QQ进行远程控制 想知道如何用QQ进行远程控制 如何用vb实现远程控制开关机？高手请进！！！ 如何用vb创建二叉树及进行操作