【实例说明】
    在对对碰游戏中，点击两个图片它们就会互换图片内容……。本例就是讲解如何实现两个图片互换的效果（只用两个图片框交换它们的内容，而不是有第三个图片框参与）。

【编程思路】
    两个图片互换内容如同两个变量互换值：
        Temp=a
        a=b
        b=Temp
    本例却只允许使用两个图片框，所以只能使用虚似的图片框（利用控件数组加载一个新的图片框）。

【设计步骤】
    1.新建一个标准工程，创建一个新窗体，默认名为Form1。
    2.在Form1窗体中放置两个图片框数组(Picture1(0)、Picture1(1))，两个Command控件

    3.源程序  [素材源程序下载]


'交换图片内容
Private Sub Command1_Click()
        '加载一个新的图片框
        Load Picture1(2)
                '交换两个图片
                Picture1(2).Picture = Me.Picture1(0).Picture
                Me.Picture1(0).Picture = Me.Picture1(1).Picture
                Me.Picture1(1).Picture = Picture1(2).Picture
        '卸载所加载的图片框
        Unload Picture1(2)
End Sub

'退出
Private Sub Command2_Click()
        End
End Sub