广告合作
  • 今日头条

    今日头条

  • 百度一下

    百度一下,你就知道

  • 新浪网

    新浪网 - 提供新闻线索,重大新闻爆料

  • 搜狐

    搜狐

  • 豆瓣

    豆瓣

  • 百度贴吧

    百度贴吧——全球领先的中文社区

  • 首页 尚未审核订阅工具 订阅

    易语言制作电脑自动校准时间软件

    来源:网络收集  点击:  时间:2024-05-04
    【导读】:
    电脑时间不准确电脑时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件怎么办,有自动校正器,就电脑时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件让小电脑时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件T教你如何电脑电脑时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件制作自电脑时间不准确怎么办,有自动校正器,就让小T教你如何制作自动校准时间软件动校准时间软件工具/原料more易语言6.3一个大脑方法/步骤1/5分步阅读

    打开易语言,建立启动窗口(注意不会使用的到网上找基础教程)

    2/5

    加入两个标签,两个编辑框。,一个按钮,如下图排列并改名(注意不会使用的到网上找基础教程)

    3/5

    双击启动窗口打开窗口程序集(注意不会使用的到网上找基础教程)

    4/5

    输入源码

    .版本 2

    .支持库 xplib

    .支持库 internet

    XP风格 (1)

    系统时间标签.标题 = 到文本 (取现行时间 ())

    .子程序 _按钮自动更新_被单击

    按钮自动更新.禁止 = 真

    .变量循环首 (1, 3, 1, )

    自动更新时间 ()

    .变量循环尾 ()

    自动更新时间 ()

    按钮自动更新.禁止 = 假

    .子程序 自动更新时间

    .局部变量 网络文本, 文本型

    .局部变量 时间数组, 文本型, , 0

    .局部变量 临时数组, 文本型, , 0

    .局部变量 现在日期, 文本型

    .局部变量 日期时间, 文本型

    .局部变量 小时, 文本型

    .局部变量 分钟, 文本型

    .局部变量 秒, 文本型

    .局部变量 n, 整数型

    .局部变量 误差, 整数型, , , 误差的秒数

    系统时间标签.标题 = 到文本 (取现行时间 ())

    n = 取启动时间 ()

    网络文本 = 到文本 (HTTP读文件 (“http://www.time.ac.cn/stime.asp”))

    .如果真 (网络文本 = “”)

    自动更新时间 ()

    .如果真结束

    时间数组 = 分割文本 (网络文本, “document.write(”, )

    .如果真 (取数组成员数 (时间数组) < 2)

    信息框 (“取时间失败!”, 0, )

    返回 ()

    .如果真结束

    临时数组 = 分割文本 (时间数组 , “)”, )

    现在日期 = 临时数组

    临时数组 = 分割文本 (时间数组 , “;”, )

    小时 = 删全部空 (取文本右边 (临时数组 , 取文本长度 (临时数组 ) - 寻找文本 (临时数组 , “=”, , 假)))

    分钟 = 删全部空 (取文本右边 (临时数组 , 取文本长度 (临时数组 ) - 寻找文本 (临时数组 , “=”, , 假)))

    秒 = 删全部空 (取文本右边 (临时数组 , 取文本长度 (临时数组 ) - 寻找文本 (临时数组 , “=”, , 假)))

    误差 = (取启动时间 () - n) ÷ 1000

    .如果真 (误差 < 0.5)

    误差 = 0

    .如果真结束

    .如果真 (误差 ≥ 300)

    _按钮自动更新_被单击 ()

    .如果真结束

    .判断循环首 (误差 > 60)

    分钟 = 到文本 (到数值 (分钟) + 误差 \ 60)

    秒 = 到文本 (到数值 (秒) + 误差 % 60)

    .如果真 (到数值 (分钟) > 60)

    小时 = 到文本 (到数值 (分钟) + 1)

    分钟 = 到文本 (到数值 (分钟) - 60)

    .如果真结束

    .如果真 (到数值 (秒) ≥ 60)

    分钟 = 到文本 (到数值 (分钟) + 1)

    秒 = 到文本 (到数值 (秒) - 60)

    .如果真结束

    .判断循环尾 ()

    秒 = 到文本 (到数值 (秒) + 误差)

    日期时间 = 现在日期 + 小时 + “时” + 分钟 + “分” + 秒 + “秒”

    置现行时间 (到时间 (日期时间))

    校准时间标签.标题 = 日期时间

    处理事件 ()

    5/5

    点击运行测试(注意不会使用的到网上找基础教程)

    注意事项

    (注意不会使用的到网上找基础教程)

    易语言校准
    本文关键词:

    版权声明:

    1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。

    2、本站仅提供信息发布平台,不承担相关法律责任。

    3、若侵犯您的版权或隐私,请联系本站管理员删除。

    4、文章链接:http://www.1haoku.cn/art_666977.html

    相关资讯

    ©2019-2020 http://www.1haoku.cn/ 国ICP备20009186号05-06 02:38:34  耗时:0.029
    0.0289s