1、首先,准备好测试文件(文件随意),这里不强求使用某个文件,只是为了配合此次测试而已。
2、运行易语言主程序,在d出的新建工程文件对话框中,选择Windows窗口程序然后点击确定按钮,进入Windows窗口程序设计界面。
3、在已经创建的Windows窗口程序的窗口上,绘制标签组件、编辑框组件及拖放对象各一个并调整他们的位置以适应窗口。
4、修改各组件的相关属性、将各组件规范命名,为后续的代码编写做准备。好的命名习惯会使得你的编程速度更加快速和得心应手。
5、然后,就进入代码编写阶段了。首先,需要注册一下拖放对象,然后将拖放对象的接收文件属性设置为真,编写相应代码。
6、代码编写完毕,进入测试阶段。果断猛戳F5键,运行程序。将测试文件,拖拽至程序的编辑框中,查看编辑框的内容是否发生了变化。
用不同符号分开,例如txt中:谜语1|谜底1 谜语2|谜底2 谜语3|谜底3 。。。。。谜语n|谜底n
文本= 读取文本(XXX。txt)
谜语文本数组=分割文本(文本,“ ”)。。。。。。。用空格分开每个谜语
那么,谜语文本数组[1]=“谜语1|谜底1”
谜语文本数组[2]=“谜语2|谜底2”
。。。。。。。。。
谜语文本数组[n]=“谜语n|谜底n”
谜语=取随机数(1,取数组成员数(谜语文本数组))。。。。1到n之间取个随机数
比如,随机到3,则
谜语=“谜语3|谜底3”
随机到的谜语文本数组=分割文本(谜语,“|”)。。。。把 谜语=“谜语3|谜底3” 用“|”分开
则 随机到的谜语文本数组[1]="谜语3"
随机到的谜语文本数组[2]="谜底3"
谜语编辑框。内容=“随机到的谜语文本数组[1]”
谜底编辑狂。内容=“ 随机到的谜语文本数组[2]”
辛苦手打,有问题追问
.版本 2.支持库 EThread
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
启动线程 (&子程序1, , )
.子程序 子程序1
遍历文件 (“C:\Users\Administrator\Desktop\新建文件夹\”)
.子程序 遍历文件, 文本型
.参数 遍历目录, 文本型
.局部变量 临时_文件, 文本型
.局部变量 临时_创建时间, 文本型
.局部变量 数组1, 文本型, , "0"
.局部变量 数组2, 整数型, , "0"
.局部变量 数组3, 整数型, , "0"
.局部变量 i, 整数型
.局部变量 s, 整数型
.局部变量 文本, 文本型
临时_文件 = 寻找文件 (遍历目录 + “\*.*”, )
.判断循环首 (临时_文件 ≠ “”)
临时_文件 = 寻找文件 (, )
.如果真 (临时_文件 ≠ “”)
文件_取时间 (遍历目录 + 临时_文件, 临时_创建时间)
' 调试输出 (临时_文件, 到长整数 (时间_取现行时间戳 (真)) - 时间_北京转格林威治 (到时间 (临时_创建时间)))
加入成员 (数组1, 临时_文件)
加入成员 (数组2, 到长整数 (时间_取现行时间戳 (真)) - 时间_北京转格林威治 (到时间 (临时_创建时间)))
加入成员 (数组3, 到长整数 (时间_取现行时间戳 (真)) - 时间_北京转格林威治 (到时间 (临时_创建时间)))
.如果真结束
.判断循环尾 ()
数组排序 (数组3, 真)
.计次循环首 (取数组成员数 (数组3), i)
.计次循环首 (取数组成员数 (数组2), s)
.如果真 (数组3 [i] = 数组2 [s])
文件_取时间 (遍历目录 + 数组1 [s], 临时_创建时间)
调试输出 (数组1 [s], 临时_创建时间)
文本 = 文本 + 数组1 [s] + #换行符
数组2 [s] = 999999999999
.如果真结束
.计次循环尾 ()
.计次循环尾 ()
返回 (文本)
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)