你们好，最近小艾特发现有诸多的小伙伴们对于vb小程序设计，vb小程序这个问题都颇为感兴趣的，今天小活为大家梳理了下，一起往下看看吧。

1、 在桌面上用鼠标左键双击打开VB编程软件，单击左边工具栏上的图片按钮，在Form1窗口上画一个图片框，然后单击图片属性面板的图片属性上的【加载图片】按钮，如下图所示。

2、 然后在弹出的图片选择对话框中选择合适的红绿灯材质来体现效果。这里先选择一个红灯的图片，可以在Form1上看到图片，如下图所示。

3、 然后在图像属性面板的名称属性上，将其重命名为红色，这样识别后就不会与其他图像混淆，避免被称为图像而难以区分，如下图所示。

4、 然后在VB编程的界面中，还可以直接复制控件，比如复制两个红色图像控件，不添加控件组，将后两个依次重命名为黄色和绿色，如下图所示。

5、 然后，将黄色图形控件与红色控件重叠，右键单击它，并在弹出菜单中选择[移动到底部]。放好之后，把绿色的图形控件放在底部。三个图形控件按照红色、黄色和绿色的顺序重叠，如下图所示。

6、 然后，用鼠标左键双击红色图形控件，弹出输入代码窗口，在上面输入以下代码段：

7、 Private Sub red_Click()'红灯单击

8、 Red. Visible=False' The red light is invisible.

9、 Yellow. Visible=true' yellow light is visible

10、 End Sub

11、 Private Sub yellow_Click ()' yellow light click.

12、 Yellow. Visible=False' Yellow light is invisible.

13、 Green. Visible=true' green light is visible.

14、 End Sub

15、 Private Sub green_Click ()' green light click

16、 Green. Visible=false' green light is invisible.

17、 Red. Visible=true' red light is visible.

18、 End Sub

19、 最后点击运行按钮，依次点击弹出窗口程序。此时，红、黄、绿灯会不断变化。

以上就是vb小程序这篇文章的一些介绍，希望对大家有所帮助。