VB 中想实现两张或者两张以上 image 图片交替出现

答案:3 悬赏:70 手机版

解决时间 2021-02-28 19:17

提问者网友：戎马万世
2021-02-28 07:51

VB 中想实现两张或者两张以上 image 图片交替出现，计时器里面怎么填写代码啊？我现在只会第一张暂短消失 image.visible=not image1.visible
第二张就不会了，还有第三张....... 求高手指教！！！！！

最好有简短代码！

最佳答案

五星知识达人网友：狂恋
2021-02-28 08:24

计时器name属性为jsq
图象框name属性分别为m1,m2,m3
private sub jsq_timer()
if m1.visible=true then
m1.visible=fales:m2.visible=true:m3.visible=false
elseif m2.visible=true then
m1.visible=false:m2.visible=false:m3.visible=true
elseif m3.visible=true then
m1.visible=true:m2.visible=false:m3.visible=false
end if
end sub

全部回答

1楼网友：狂恋
2021-02-28 10:31

加两个picture控件picture1和picture2，分别加入2张图片用timer来实现两张图片交替显示: private sub ontimer() if picture1.visible = false then picture1.visible = true picture2.visible = false else picture2.visible = true picture1.visible = false end if end sub

2楼网友：撞了怀
2021-02-28 10:01

可以加个picturebox图片框，在添加图片列表框：imagelist，在timer事件中让picturebox的image属性遍历imagelist中的所有图片不就行了哈

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息