易语言取网络时间源码介绍

.版本2.支持库RegEx.支持库internet.程序集窗口程序集1.程序集变量现在时间,日期时间型.子程序获取时间,日期时间型.局部变量ym,文本型.局部变量o.局部变量t.局部变量time,文本型.局部变量正则表达式,正则表达式.局部变量网络时间,日期时间型ym＝到文本HTTP读文件“”正则表达式.创建“0-9{4}年0-9{1,2}月0-9{1,2}日”,正则表达式.搜索ym,1,处理事件time＝time＋正则表达式.搜索ym,1,.取匹配文本ym,o＝寻找文本ym,“varhrs=”,,假＋10t＝寻找文本ym,“;”,o,假time＝time＋取文本中间ym,o,t－o＋“时”o＝寻找文本ym,“varmin=”,,假＋10t＝寻找文本ym,“;”,o,假time＝time＋取文本中间ym,o,t－o＋“分”o＝寻找文本ym,“varsec=”,,假＋10t＝寻找文本ym,“;”,o,假time＝time＋取文本中间ym,o,t－o＋“秒”返回到时间time.子程序__启动窗口_创建完毕现在时间＝获取时间现在时间＝增减时间现在时间,8,1时钟1.时钟周期＝1000.子程序_时钟1_周期事件处理事件现在时间＝增减时间现在时间,8,1标签1.标题＝“网络时间：”＋到文本现在时间标签2.标题＝“系统时间：”＋到文本取现行时间