怎样在VB窗口里添加动态的GIF图片
1个回答
展开全部
把GIF分解成若干单桢的GIF,用时间控件一幅幅的加载
private sub timer1-timer()
static a as imteger'假如有7张单张的GIF
if a=8 then
a=1'回到第一张的加载
else
a=a+1'不断的加载下一幅GIF
end if
image1.picture=loadpicture(app.path+"\dh"&a&".gif")
end sub
private sub timer1-timer()
static a as imteger'假如有7张单张的GIF
if a=8 then
a=1'回到第一张的加载
else
a=a+1'不断的加载下一幅GIF
end if
image1.picture=loadpicture(app.path+"\dh"&a&".gif")
end sub
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
博思aippt
2024-07-20 广告
博思AIPPT是基于ai制作PPT的智能在线工具，它提供了4种AI制作PPT的方式，包括AI生成大纲、AI直接生成PPT、文本生成PPT、AI提炼word文档生成PPT，一站式集成多种AI生成PPT的方式，可满足办公用户的不同需求和使用场景...
点击进入详情页
本回答由博思aippt提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
