VB事件运用

来源：百度知道 编辑：UC知道 时间：2024/07/05 02:31:19
我在学习VB时遇到了个问题，希望高手指教，在命令按钮里的Picture1.picture = LoadPicture("...")这个语句里，是Click的事件，我添加了一个图片框后，要把把图片框里的图片转换成另一个图片，我试过，的确可以用，我本来就在Picture1的picture属性里添加一张图，请问用什么事件或是什么方法能使在第二次单击这个命令按钮时让转变的图片变回原来Picture属性里的那张图片？请告诉我下，谢谢

单击命令按钮轮流切换图片：
Private Sub Command1_Click()
Static c As Integer
If c = 0 Then
Picture1.Picture = LoadPicture(\"一张\")
Else
Picture1.Picture = LoadPicture(\"另一张\")
End If
c = 1 - c
End Sub

加1个LABEL标签caption 为1，标签可以设为不可见

Private Sub Command1_Click()
Label1.Caption = Label1.Caption + 1
If Label1.Caption Mod 2 = 0 Then
Picture1.Picture = LoadPicture("一张")
Else
Picture1.Picture = LoadPicture("另一张")
End If

End Sub