欢迎访问皮皮网官网
皮皮网

【斩幻想源码】【cssweb源码】【mxgraph源码】易语言多次运行程序源码_易语言多线程老是重复运行

时间:2024-12-29 09:05:54 分类:休闲 来源:点石软件源码

1.?易语言多语言运行????Զ?????г???Դ??
2.求易语言统计内容范围000000-999999出现的次数程序源码

易语言多次运行程序源码_易语言多线程老是重复运行

?????Զ?????г???Դ??

       月数不好定,因为每个月天数不一样。次运程老斩幻想源码算到天就行了。行程序源cssweb源码

       代码如下:

       .版本 2

       .支持库 spec

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

       .局部变量 运行时间,码易mxgraph源码 整数型, , , 毫秒

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

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

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

       .参数 参_秒, 整数型

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

       .局部变量 天, 整数型

       .局部变量 小时, 整数型

       .局部变量 分钟, 整数型

       .局部变量 秒, 整数型

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

       天 = 参_秒 ÷ ÷ ÷

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

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

       秒 = 参_秒 %

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

求易语言统计内容范围-出现的次数程序源码

       .版本 2

       .支持库 RegEx

       .子程序 _按钮_统计_被单击

       .局部变量 文本组, 文本型, , "0"

       .局部变量 分组内容, 文本型, , "0"

       .局部变量 记录个数, 整数型, , "0"

       .局部变量 是否存在, 逻辑型

       .局部变量 i, 整数型

       .局部变量 j, 整数型

       .局部变量 文本, 文本型

       .局部变量 个数, 整数型

       .局部变量 正则, 正则表达式

       正则.创建 (“[^0-9]+”, )

       编辑框1.内容 = 正则.替换 (编辑框1.内容, “,”, 1, , 真, 真)

       文本组 = 分割文本 (编辑框1.内容, “,”, )

       .计次循环首 (取数组成员数 (文本组), i)

           是否存在 = 假

           .计次循环首 (取数组成员数 (分组内容), j)

               .如果真 (分组内容 [j] = 文本组 [i])

                   是否存在 = 真

                   记录个数 [j] = 记录个数 [j] + 1

                   跳出循环 ()

               .如果真结束

           .计次循环尾 ()

           .如果真 (是否存在 = 假)

               加入成员 (记录个数, 1)

               加入成员 (分组内容, 文本组 [i])

           .如果真结束

       .计次循环尾 ()

       .如果真 (取数组成员数 (分组内容) = 0)

           返回 ()

       .如果真结束

       编辑框2.内容 = “”

       .计次循环首 (取数组成员数 (分组内容) - 1, i)

           .变量循环首 (i + 1, 取数组成员数 (分组内容), 1, j)

               .如果真 (记录个数 [i] > 记录个数 [j])

                   文本 = 分组内容 [i]

                   分组内容 [i] = 分组内容 [j]

                   分组内容 [j] = 文本

                   个数 = 记录个数 [i]

                   记录个数 [i] = 记录个数 [j]

                   记录个数 [j] = 个数

               .如果真结束

           .变量循环尾 ()

           编辑框2.加入文本 (分组内容 [i] + “ 出现次数:” + 到文本 (记录个数 [i]) + #换行符)

       .计次循环尾 ()

       编辑框2.加入文本 (分组内容 [i] + “ 出现次数:” + 到文本 (记录个数 [i]) + #换行符)

copyright © 2016 powered by 皮皮网   sitemap