高考问答王双唯与聂文涛百度云:VB程序，上有A、B两个图片框，一个按钮，按下按钮以后，A变成B，再按一下B变成A
来源：百度文库 编辑：高考问答 时间：2024/05/06 02:44:04
VB程序，上有A、B两个图片框，一个按钮，按下按钮以后，A变成B，再按一下B变成A，按多少下，交换多少次，怎么做？
picture1.picture=loadpicture(文件名)
picture2.picture=loadpicture(文件名)
我只能做到这样，交换一次，
picture1.picture=loadpicture(文件名)
picture2.picture=loadpicture(文件名)
我只能做到这样，交换一次，
在窗体分开装载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
在按钮点击事件中写入：
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
搞定！！！
再定义个picture3
picture3.picture=pictrue1.picture
picture1.picture=picture2.picture
picture2.picture=picture3.picture
可以利用控件的VISIBLE属性来调控。