易语言:怎么随机取一个文件夹中的图片放在图片框

易语言:怎么随机取一个文件夹中的图片放在图片框,第1张

局部变量 文件路径 文本型

局部变量 文件名 文文型

局部变量 n 文本型 数组0

文件路径=“D:\\”

文件名=寻找文件(文件路径+“**”,,)

判断循环首(文件名≠“”)

加入成员(n,文件路径+文件名)

文件名=寻找文件(,)

判断循环尾()

置随机数种子()

如果真(取数组成员数(n)≠0)

框1=读入文件(n[取随机数(1,取数组成员数(n))])

如果真结束

请教如何编写VBA代码,每次单击按钮时,能在同一页演示文稿(如文本框)中随机抽取指定文件夹下(或与当前演示文稿中在同一文件夹下)的任意一张,每次抽取的均为不相同的一幅,在抽取完成后还可以提示用户“抽取完毕”,点击另一控件按钮,可以实现清空文本框中的内容(),以便重新抽取

把如下代码加入<body>区域中

<SCRIPT language="JavaScript"><!--

today=new Date();

jran=todaygetTime();

function rnd() {

ia=9301;

ic=49297;

im=233280;

jran = (jrania+ic) % im;

return jran/(im10);

};

function rand(number) {

return Mathceil(rnd()number);

};

documentwrite("<CENTER>");

for(i=1;i<=1;i++) {

myNum=(rand(10)); //改成你要随机显示的数;

if(myNum == 1) documentwrite("<img src='backjpg'>");

if(myNum == 2) documentwrite("<img src='j2gif'>"); //路径,可用>

以上就是关于易语言:怎么随机取一个文件夹中的图片放在图片框全部的内容,包括:易语言:怎么随机取一个文件夹中的图片放在图片框、请教如何随机(不重复)抽取指定文件夹下的图片之一、做了一个网页,怎么随机读取图片等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zz/10145013.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-05
下一篇2023-05-05

发表评论

登录后才能评论

评论列表(0条)

    保存