
版本 2程序集 窗口程序集1子程序 __启动窗口_创建完毕 子程序 _时钟1_周期事件如果 (取时间部分 (取现行时间 (), #小时) ≥ 22 或 取时间部分 (取现行时间 (), #小时) < 2)
时钟2时钟周期 = 1000
否则
时钟2时钟周期 = 0
--------------------------------------------两个时钟,分别是时钟1和时钟2一开始先把时钟1的周期设定好时间,时钟2不设定时间,然后双击时钟1编辑代码如上当时间部分为小时,取现行时间当大22或等于的时候都执行真,应该“或”这个命令是只要两边判断的条件有一个为真,即执行真的命令。所以你想大于22时的时候,就运行时钟2为时钟周期时间为1000当时间到了凌晨的时候也就是到0:00的时候,0当然小于2了,0,1-59分-59秒这几个时间都符合后面的那个条件,所以当然也会执行了,当到2点的时候,当然判断也就不成立了,也小于22了,这样两个判断都不成立了,都为假了就执行时钟2的时钟周期为0了。如果不懂,可以留下QQ,我教你。
版本 2程序集 窗口程序集1
程序集变量 k, 日期时间型子程序 __启动窗口_创建完毕标签1标题 = “读取中”
时钟1时钟周期 = 1000
子程序_请求时间线程 ()子程序 子程序_请求时间线程如果真 (客户1连接 (“bjtimecn”, 80) = 假)
信息框 (“连接服务器失败!”, 16, )
返回 ()
如果真结束
如果真 (客户1发送数据 (#常量_请求时间数据包) = 假)
信息框 (“请求服务器端时间失败!”, 16, )
返回 ()
如果真结束
子程序 _时钟1_周期事件
局部变量 局部_服务器端时间, 整数型如果真 (客户1发送数据 (#常量_请求时间数据包) = 假)
信息框 (“请求服务器端时间失败!”, 16, )
返回 ()
如果真结束标签1标题 = 时间到文本 (k, 1)子程序 _客户1_数据到达
局部变量 局部_返回数据, 文本型局部_返回数据 = 取字节集数据 (客户1取回数据 (), #文本型, )
局部_处理数据 (局部_返回数据)子程序 局部_处理数据, , , 取出返回数据里面的日期时间
参数 参_数据, 文本型
局部变量 局部_分割数据, 文本型, , "0"
局部变量 局部_分割时间, 文本型, , "2"
局部变量 i, 整数型
局部变量 局部_标记, 整数型
局部变量 局部_服务器时间, 文本型局部_分割数据 = 分割文本 (参_数据, #换行符, )
计次循环首 (取数组成员数 (局部_分割数据), i) 如果真 (取文本左边 (局部_分割数据 [i], 5) = “var n”) ' 判断是否时间的变量信息
局部_分割时间 = 分割文本 (局部_分割数据 [i], “=”, 2)
' 置现行时间 () 局部_标记 = 局部_标记 + 1
判断开始 (局部_标记 = 1) ' 年份处理 局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “年” 判断 (局部_标记 = 2) ' 月份处理 局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “月” 判断 (局部_标记 = 3) ' 日份处理
局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “日” 判断 (局部_标记 = 5) ' 时份处理
局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “时” 判断 (局部_标记 = 6) ' 分份处理
局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “分” 判断 (局部_标记 = 7) ' 秒份处理
局部_服务器时间 = 局部_服务器时间 + 取文本左边 (局部_分割时间 [2], 取文本长度 (局部_分割时间 [2]) - 1) + “秒” 默认 判断结束 如果真结束计次循环尾 ()
输出调试文本 (“服务器时间: ” + 局部_服务器时间)
k = 到时间 (局部_服务器时间)
到文本 (取年份 (取现行时间 ())) + 取文本右边 (“0” + 到文本 (取月份 (取现行时间 ())), 2) + 取文本右边 (“0” + 到文本 (取日 (取现行时间 ())), 2)
以上就是关于易语言怎么取时间段全部的内容,包括:易语言怎么取时间段、易语言取时间的问题、易语言怎么按照指定的格式取时间等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)