vb红绿灯交通灯小程序

原创

已于 2025-06-06 08:58:09 修改 · 置顶 · 4.2k 阅读

35 ·

CC 4.0 BY-SA版权

文章标签：

#小程序 #个人开发

于 2022-03-13 14:42:13 首次发布

本文手把手教你制作VB红绿灯小程序。先介绍了制作步骤，包括新建工程、插入控件、更改属性、插入代码等。接着说明了工作原理，设定参数，单击按钮激活相关控件运行红绿灯。还提到进阶方法，可简化程序。最后作者欢迎大家点赞关注，可到GitHub下载成品。

产品信息

产品名称：数码交通灯v2.0
程序员：MorganFish
邮箱： MorganFish0508@163.com

优快云:http://blog.youkuaiyun.com/MorganFish

GitHub:https://www.github.com/MorganNotFound

以上信息与正文内容无关

代码

首先，感谢您的支持，话不多说，直接上代码：

Dim g As Integer
Dim y As Integer
Dim r As Integer
Private Sub cmdstart_Click()
cmdstart.Visible = False
cmdstop.Visible = True
Timer1.Enabled = True
Label1.Visible = True
Shape1.Visible = True
End Sub
Private Sub cmdstop_Click()
End
End Sub
Private Sub Form_Load()
Form1.BackColor = vbBlack
Label1.BackColor = vbBlack
Shape1.FillColor = vbGreen
Label1.ForeColor = vbGreen
Label1.Caption = g
Shape1.Visible = False
Label1.Visible = False
cmdstop.Visible = False
g = 10
y = 0
r = 0
Tim

最低0.47元/天解锁文章