Question

vb 单机一下按钮换一个图片的代码怎么写

比如3个图片，没点一下按钮，就换一张图片！
小弟，刚学希望高手指点！谢啦！

Answer 1

放一个picturebox 和一个commandButton
private sub form1_load()
command1.caption="更换图片"
picture1.picture="URL" '把URL换成初始图片链接
dim i
private sub Command1_click()
i=0
do
i=i+1
select case i
case 1
picture1.picture="URL" 'URL为图片1的链接
case 2
picture1.picture="URL" 'URL为图片2的链接
case 3
picture1.picture="URL" 'URL为图片3的链接
case else
i=0
end select
end sub