求教下如何取出一个文件夹下面的随机一张图片

有梦就追

求教下如何取出一个文件夹下面的随机一张图片到图片框里面

代码是什么？

qq780571

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
程序集_图片数组	文本型	0

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
局部_随机数	整数型

局部_随机数 ＝ 取随机数 (1, 取数组成员数 (程序集_图片数组))
图片框1.图片 ＝ 读入文件 (取运行目录 () ＋ “\” ＋ 程序集_图片数组 [局部_随机数])

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
局部_图片	文本型

置随机数种子 ()
局部_图片 ＝ 寻找文件 (取运行目录 () ＋ “\*.jpg”, )
判断循环首 (局部_图片 ≠ “”)
加入成员 (程序集_图片数组, 局部_图片)
局部_图片 ＝ 寻找文件 (, )
判断循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 程序集_图片数组, 文本型, , "0"<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局部_随机数, 整数型<br /> <br /> 局部_随机数 ＝ 取随机数 (1, 取数组成员数 (程序集_图片数组))<br /> 图片框1.图片 ＝ 读入文件 (取运行目录 () ＋ “\” ＋ 程序集_图片数组 [局部_随机数])<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 局部_图片, 文本型<br /> <br /> 置随机数种子 ()<br /> 局部_图片 ＝ 寻找文件 (取运行目录 () ＋ “\*.jpg”, )<br /> .判断循环首 (局部_图片 ≠ “”)<br />     加入成员 (程序集_图片数组, 局部_图片)<br />     局部_图片 ＝ 寻找文件 (, )<br /> .判断循环尾 ()

～夜雨

遍历后放到数组里   取数组的随机成员即可

yeayee

楼上也是按键精灵过来的，幸会，正解

凌木

新建文件夹 (4).zip (259.82 KB, 下载次数: 31)

2015-4-8 16:53 上传

点击文件名下载附件

剩下我de孩子气

用文件枚举 然后 是在组数里的 你随机一个组数就好了

我的确不是字母

先取目录你的图片文件名字加入到数组，在随机选择数组里的数据得到随机图片的文件名，再取图片