永发信息网

《易语言》我要将一个文件夹里的文件名按顺序 001-168的jpg文件列举在列表框里 下面的代码不知为啥不行

答案:2  悬赏:50  手机版
解决时间 2021-11-12 06:03
《易语言》我要将一个文件夹里的文件名按顺序 001-168的jpg文件列举在列表框里 下面的代码不知为啥不行
最佳答案
原因是代码中有两处的寻找文件()指令的返回值没有填入列表框中,第一处为首次查找,第二处在循环中,所以,查找的第一个文件,以及以后查找的第偶数个文件都没有填入列表框。
修改如下:

.版本 2
.支持库 shell

.子程序 插入
.局部变量 a, 文本型
.局部变量 i, 整数型
.局部变量 路径, 文本型

路径 = 浏览文件夹 (“浏览”, )
.如果真 (路径 = “”)
返回 ()
.如果真结束
列表框1.清空 ()
a = 寻找文件 (路径 + “/*.jpg”, )
.判断循环首 (a ≠ “”)
列表框1.加入项目 (a, )
a = 寻找文件 (,)
.判断循环尾 ()
返回 ()
全部回答
不懂可以追问呀 代码如下:

.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 用户选择的目录, 文本型
.局部变量 计次_变量, 整数型
.局部变量 加0, 文本型
用户选择的目录 = 浏览文件夹 (“请选择目录”, )
.如果真 (用户选择的目录 = “”)
信息框 (“您还没有选择目录呢”, #警告图标, )
返回 ()
.如果真结束
用户选择的目录 = 用户选择的目录 + “\”
.变量循环首 (3, 168, 2, 计次_变量)
加0 = “”
.如果真 (取文本长度 (到文本 (计次_变量)) = 1)
加0 = “00” + 到文本 (计次_变量)
.如果真结束
.如果真 (取文本长度 (到文本 (计次_变量)) = 2)
加0 = “0” + 到文本 (计次_变量)
.如果真结束
.如果真 (取文本长度 (到文本 (计次_变量)) = 3)
加0 = 到文本 (计次_变量)
.如果真结束
.如果真 (文件是否存在 (用户选择的目录 + 加0 + “.jpg”))
列表框1.加入项目 (用户选择的目录 + 加0 + “.jpg”, )
.如果真结束
.变量循环尾 ()追问

还是这样啊

追答.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 用户选择的目录, 文本型
.局部变量 计次_变量, 整数型
.局部变量 加0, 文本型
用户选择的目录 = 浏览文件夹 (“请选择目录”, )
.如果真 (用户选择的目录 = “”)
信息框 (“您还没有选择目录呢”, #警告图标, )
返回 ()
.如果真结束
用户选择的目录 = 用户选择的目录 + “\”
.变量循环首 (3, 168, 2, 计次_变量)
加0 = “”
.如果真 (取文本长度 (到文本 (计次_变量)) = 1)
加0 = “00” + 到文本 (计次_变量)
.如果真结束
.如果真 (取文本长度 (到文本 (计次_变量)) = 2)
加0 = “0” + 到文本 (计次_变量)
.如果真结束
.如果真 (取文本长度 (到文本 (计次_变量)) = 3)
加0 = 到文本 (计次_变量)
.如果真结束
.如果真 (文件是否存在 (用户选择的目录 + 加0 + “.jpg”))
列表框1.加入项目 (加0 + “.jpg”, )
.如果真结束
.变量循环尾 ()追问.变量循环首 (3, 168, 2, 计次_变量)

要改成.变量循环首 (1, 168, 1, 计次_变量) 吧
这样才是 从001开始到168吧

谢谢了 我没有想到用变量循环首。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
求解。要过程
枣红马犬和黄马犬那个比较好
明天能到吗?
乙丑年、己巳月、丁巳日、丁未时八字求解,谢
大家有知道中金影视的吗
如何对苹果,梨,香蕉,柑橘等水果进行感官检验
母线槽相间绝缘电阻5兆欧能正常运行吗
东津灯饰我想知道这个在什么地方
一个很多年的老池塘,养鱼放钓的问题
鑫全工作室mpacc培训好不好?
铁力木木苗多少钱棵?那里有的卖?
一般的卸妆乳能用来卸眼妆么?
peach和great的ea发音—样吗
我顿顿吃两斤米饭。一斤菜。力气大一直手能把
新城湾语城怎么样?好不好?值不值得买?
推荐资讯
论新型大国关系论文800字
ios7系统怎么下载安装微云?在pp助手的微云历
如图所示是山区村民用斧头劈柴的剖面图,图中
4个半月男宝宝体重5.7公斤正常吗
经过点A(1,-1)与(3,1)圆心在y轴上的圆
为什么欧洲超过北纬四十度仍有地中海气候
地板里面有 美地森林 这个牌子的吗?
马鞍山3路公交车底站是哪里?
纹身贴贴上去有一层银色的膜,好像去不掉,一
QQ华夏中战士30---35级之间,可以去哪里
申通快递(万宁牛漏店)地址在哪,我要去那里办
男友差点要了我,纠结......能原谅他吗?以后
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?