Images应用程序

Images 应用程序中的事件

Image 应用程序对事件的响应如下：

每一个 Image 控件的 Click 事件使 Shape 控件的 Left 属性与它自己的 Left 属性相同，并将图形移到 Image 的顶端。

调用 PictureBox 的 Cls 方法清除 StatusBar 的当前标题。

调用 PictureBox 的 Print 方法在 StatusBar 上打印新标题。

Image 控件 Click 事件的代码如下：

Private Sub imgHeart_Click()

shpCard.Left = imgClub.Left

picStatus.Cls

picStatus.Print "Selected: Club"

shpCard.Visible = True

End Sub

注意，Click 事件代码中第一行利用 = 操作符为 Shape 控件的 Left 属性赋一个值 (让它等于 Image 控件的 Left 属性)。下面两行调用方法，因而不需要操作符。在第三行中，值 ("Selected: Club") 是 Print 方法的一个参数。

该应用代码中还有一行很重要；它在 Form Load 事件中。

shpCard.Visible = False

将 Shape 控件的 Visible 属性设为 False，Shape 控件被隐藏起来直至单击第一幅 Image。在 Image 控件 Click 事件的最后一步将 Visible 属性设为 True。

详细信息 关于属性、方法和事件详细信息，请参阅“编程基础”。