VB程序，上有A、B两个图片框，一个按钮，按下按钮以后，A变成B，再按一下B变成A

Question

VB程序，上有A、B两个图片框，一个按钮，按下按钮以后，A变成B，再按一下B变成A，按多少下，交换多少次，怎么做？
picture1.picture=loadpicture(文件名)
picture2.picture=loadpicture(文件名)
我只能做到这样，交换一次，

Answer 1

在窗体分开装载Picture1和Picture2，然后调在一起。

Option Explicit
Dim pic_flag As Boolean

Private Sub Command1_Click()
If pic_flag Then
Picture1.Visible = True
Picture2.Visible = False
Else
Picture2.Visible = True
Picture1.Visible = False
End If
pic_flag = Not pic_flag
End Sub

Answer 2

在按钮点击事件中写入：
static BB as boolean
if bb=true then
picture1.picture=loadpicture(文件名1)
picture2.picture=loadpicture(文件名2)
bb=flase
else
picture1.picture=loadpicture(文件名2)
picture2.picture=loadpicture(文件名1)
bb=true
end if

搞定！！！

Answer 3

再定义个picture3
picture3.picture=pictrue1.picture
picture1.picture=picture2.picture
picture2.picture=picture3.picture

Answer 4

可以利用控件的VISIBLE属性来调控。