标题:请教版主:关于图片更换的问题
只看楼主
msxjc
Rank: 1
等 级:新手上路
帖 子:83
专家分:0
注 册:2005-3-28
结帖率:50%
 问题点数:0 回复次数:4 
请教版主:关于图片更换的问题
请教版主一个问题:有一个窗体,在它的picture属性中加载了一张图片,该图片文件放在该应用程序目录下的image文件夹下,如果有五张图片,我想请问如何用timer控件实现每隔一定时间自动更换该窗体上的图片,使这五张图片轮流加载到窗体上。很急啊,整个软件就差这一个功能了。
搜索更多相关主题的帖子: 版主 窗体 加载 软件 
2005-04-27 22:42
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
得分:0 
太简单了吧。

天津网站建设 http://www./
2005-04-28 12:16
msxjc
Rank: 1
等 级:新手上路
帖 子:83
专家分:0
注 册:2005-3-28
得分:0 
是很简单,可是我一时想不到了,你可以告诉我吗?具体代码。

2005-04-28 18:38
loveve
Rank: 4
等 级:业余侠客
威 望:1
帖 子:452
专家分:213
注 册:2005-4-11
得分:0 
加一个timer控件,代码:
Private Sub Timer1_Timer()
   static a as integer ,b as integer
   a=a+1
   b=a mod 5
   select case b
       case 0
            picture1.picture=loadpicture()
       case 1
            picture1.picture=loadpicture()
       case 2
           picture1.picture=loadpicture()
       case 3
           picture1.picture=loadpicture()
       case 4
           picture1.picture=loadpicture()
    end select      
End Sub
在()里加入你的图片的路径,比如:app.path&image1.jpg

五月的雪
2005-04-29 18:34
深夜狼
Rank: 1
来 自:广西桂林
等 级:新手上路
帖 子:348
专家分:0
注 册:2005-5-9
得分:0 
顶~~
2005-05-10 20:42



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-16893-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018809 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved