Question

使用vb6.0编写一个程序怎么实现一个命令按钮控制显示一张图片

使用一个命令按钮, 怎样实现两张图片的交换啊,高手来帮个忙啊

Answer 1

呵呵，也可以设置3个图片框，分别在两个图片框里面放上图片（两个可见（picture1和picture2），一个不可见（picture3）），当单击命令按钮的时候便触发图片交替，实现图片变换

private sub command 1 ()
picture3.picture = picture1.picture
picture1.picture = picture2.picture
picture2.picture = picture3.picture
end sub

Answer 2

可以不可以这样理解，每秒钟变换一个图片

设置一个timer，internal设置为1000

记得之前将command1的style改为1

Dim a As Integer
Private Sub Timer1_Timer()
a = a + 1
If a Mod 2 = 0 Then
Command1.Picture = LoadPicture("picture1的路径")
Else
Command1.Picture = LoadPicture("picture2的路径")
End
End Sub