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。
詳細信息 關於屬性、方法和事件詳細信息，請參閱“編程基礎”。
