皮皮网

【装修日记网站源码】【源码躲避赛车游戏】【智能售货系统源码】易语言全盘监控源码_易语言实时监控源码易语言源码祝福易语言刷商城

2024-12-28 19:10:21 来源:vip在线源码

1.?易语言全语言源码易语言源语?????ȫ?̼??Դ??
2.易语言如何全盘搜素主目录下指定文件

易语言全盘监控源码_易语言实时监控源码易语言源码祝福易语言刷商城

??????ȫ?̼??Դ??

       月数不好定,因为每个月天数不一样。盘监装修日记网站源码算到天就行了。控源源码躲避赛车游戏

       代码如下:

       .版本 2

       .支持库 spec

       .子程序 _按钮1_被单击

       .局部变量 运行时间,码易码祝智能售货系统源码 整数型, , , 毫秒

       运行时间 = 取启动时间 ()

       调试输出 (取毫秒到天 (运行时间))

       .子程序 取毫秒到天, 文本型

       .参数 参_秒, 整数型

       .局部变量 参_秒, 整数型

       .局部变量 天, 整数型

       .局部变量 小时, 整数型

       .局部变量 分钟, 整数型

       .局部变量 秒, 整数型

       参_秒 = 取启动时间 () ÷

       天 = 参_秒 ÷ ÷ ÷

       小时 = (参_秒 - 天 × × ) ÷

       分钟 = (参_秒 - 天 × × - 小时 × ) ÷

       秒 = 参_秒 %

       返回 (到文本 (天) + “天” + 到文本 (小时) + “小时” + 到文本 (分钟) + “分钟” + 到文本 (秒) + “秒”)

易语言如何全盘搜素主目录下指定文件

       .版本 2

       .子程序 __启动窗口_创建完毕

       .局部变量 盘符, 文本型

       .局部变量 子目录, 文本型

       .如果真 (输入框 (, “请输入盘符:”, “D:”, 盘符, ) = 假)

           结束 ()

       .如果真结束

       .如果真 (取文本右边 (盘符, 1) ≠ “\”)

           盘符 = 盘符 + “\”

       .如果真结束

       子目录 = 寻找文件 (盘符 + “*”, #子目录)

       .判断循环首 (子目录 ≠ “”)

           .如果真 (取文本左边 (子目录, 1) ≠ “.”)

               搜寻 (盘符 + 子目录)

           .如果真结束

           子目录 = 寻找文件 (, #子目录)

       .判断循环尾 ()

       .子程序 搜寻

       .参数 目录, 文本型

       .局部变量 文件名, 文本型

       文件名 = 寻找文件 (目录 + “\PathConfig.ini”, )

       .判断循环首 (文件名 = “PathConfig.ini”)

           列表框1.加入项目 (目录, )

           文件名 = 寻找文件 (, )

       .判断循环尾 ()