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

       月数不好定，因为每个月天数不一样。盘监互助鸭源码算到天就行了。控源云购源码crm

       代码如下：

       .版本 2

       .支持库 spec

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

       .局部变量 运行时间,码易码祝金腰带指标源码 整数型, , , 毫秒

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

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

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

       .参数 参_秒, 整数型

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

       .局部变量 天, 整数型

       .局部变量 小时, 整数型

       .局部变量 分钟, 整数型

       .局部变量 秒, 整数型

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

       天 ＝ 参_秒 ÷ ÷ ÷

       小时 ＝ (参_秒 － 天 × × ) ÷

       分钟 ＝ (参_秒 － 天 × × － 小时 × ) ÷

       秒 ＝ 参_秒 ％

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

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

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

       .局部变量 盘符, 文本型

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

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

           结束 ()

       .如果真结束

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

           盘符 ＝ 盘符 ＋ “\”

       .如果真结束

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

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

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

               搜寻 (盘符 ＋ 子目录)

           .如果真结束

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

       .判断循环尾 ()

       .子程序 搜寻

       .参数 目录, 文本型

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

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

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

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

           文件名 ＝ 寻找文件 (, )

       .判断循环尾 ()