易语言随机载入图片框图片
就是一个启动窗口,上面有个图片框,我想每次启动的时候随机载入不同的图片不要有随机载入多个窗口,那样不好只是要随机载入启动窗口的图片框的图片我的朋友说可以用选件夹实现,但我...
就是一个启动窗口,上面有个图片框,我想每次启动的时候随机载入不同的图片不要有随机载入多个窗口,那样不好只是要随机载入启动窗口的图片框的图片我的朋友说可以用选件夹实现,但我不会高人指点完成加分答得越好加得越多
展开
2013-06-20
展开全部
试试这个代码吧,“图片文件夹”,是你存放那些准备随机显示的图片的文件夹路径。
.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 图片组, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 x, 整数型
置随机数种子 ()
临时文本 = 寻找文件 (图片文件夹 + “*”, )
加入成员 (图片组, 临时文本)
.循环判断首 ()
临时文本 = 寻找文件 (, )
.如果真 (取文本右边 (临时文本, 4) = “.jpg”)
加入成员 (图片组, 临时文本)
.如果真结束
.循环判断尾 (临时文本 ≠ “”)
x = 取随机数 (1, 取数组成员数 (图片组))
图片框1.图片 = 读入文件 (图片文件夹 + 图片组 [x])
.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 图片组, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 x, 整数型
置随机数种子 ()
临时文本 = 寻找文件 (图片文件夹 + “*”, )
加入成员 (图片组, 临时文本)
.循环判断首 ()
临时文本 = 寻找文件 (, )
.如果真 (取文本右边 (临时文本, 4) = “.jpg”)
加入成员 (图片组, 临时文本)
.如果真结束
.循环判断尾 (临时文本 ≠ “”)
x = 取随机数 (1, 取数组成员数 (图片组))
图片框1.图片 = 读入文件 (图片文件夹 + 图片组 [x])
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询