关于我们 共44页[1 2 3 4 5 6 7 >»<... 最后一页]

用鼠标点击“路口”图象，使红绿灯交替变化

制作应用程序界面

单击工具箱中Image控件图标，在窗体中放置Image1，调整Image1的位置

    设置控件的属性

a)         单击form1窗体，单击Picture属性中的“……”按钮，然后再从“加载图片”对话框中导入“路口”作为背景图片（注：图片在C盘的高中多媒体素材文件夹中）。

b)        单击Image1控件，单击Picture属性中的“……”按钮，然后再从“加载图片”对话框中导入“亮绿灯”图片

编写程序代码

a)  Form1窗体单击事件代码如下：
Private Sub Form_Click()
Image1.Visible = True '单击窗体，显示绿灯
End Sub

    Form1窗体装载事件代码如下：
    Private Sub Form_Load()
    Image1.Visible = False '窗体装载时，隐藏绿灯
    End Sub

    Image1图像框单击事件代码如下：
    Private Sub Image1_Click()
    Image1.Visible = False '单击绿灯，隐藏绿灯
    End Sub

b)       程序说明：

在这个程序中使用了图像控件Image1的Visible属性的显示和隐藏的来实现红绿灯交替变化。另外Image1控件的放置要和路口的位置调节成一个画面。