高考倒计时-易语言

    xiaoxiao2025-03-29  19

    用易语言写一个高考倒计时软件

    写在前面

    以下内容仅适合小白学习大牛勿喷,如有不足欢迎指出 如有侵权请联系作者删除 邮箱:1322922002@qq.com 扫码微信公众号

    开始

    为保证软件的长期可用性倒计时从网络获取 页面倒计时内容来自:天气网高考倒计时

    需要组件

    超文本浏览框 透明标签

    设置

    1.将 超文本浏览框 地址设置为https://wannianli.tianqi.com/jishiqi/gaokaodaojishi.html 可停留焦点设置为 假 (防止自动获取焦点滑动鼠标滚轮改变内容) 允许设计时浏览属性改为 真 2.将 透明标签 覆盖在超文本浏览框上面 (阻止用户使用鼠标改变页面内容) 3.调整位置以及大小如图 双击窗口标题进入代码编辑页面 检查本程序是否联网

    .如果真 (取反 (是否与互联网连接 ())) 信息框 (“当前没有检测到网络连接,请检查网络后重试”, 0, , ) 结束 ()

    设置 窗口创建完毕局部变量及类型代码如下

    .版本 2 .局部变量 当前版本号, 文本型 .局部变量 网络版本号, 文本型

    如图 设置当前程序版本号

    当前版本号 = “2.0”

    获取网络版本号

    ‘代码部分内容需替换 网络版本号 = 取指定文本 (到文本 (HTTP读文件 (“'网页链接”)), “版本头”, “版本尾”)

    代码示例 新建子程序将网页内容中的版本号剥离

    .版本 2 .子程序 取指定文本, 文本型 .参数 完整文本, 文本型 .参数 起始文本, 文本型 .参数 终止文本, 文本型 .局部变量 待取文本总长度 .局部变量 中间文本, 文本型 .局部变量 取得文本 .局部变量 最终文本, 文本型 待取文本总长度 = 取文本长度 (完整文本) 取得文本 = 寻找文本 (完整文本, 起始文本, , 假) + 取文本长度 (起始文本) 中间文本 = 取文本中间 (完整文本, 取得文本, 待取文本总长度) 待取文本总长度 = 取文本长度 (中间文本) 取得文本 = 寻找文本 (中间文本, 终止文本, , 假) - 1 最终文本 = 取文本中间 (中间文本, 1, 取得文本) 返回 (最终文本)

    代码图示 判断本地版本号是否小于网络版本号

    .版本 2 .支持库 eAPI .判断开始 (当前版本号 < 网络版本号) .如果真 (信息框 (“为了优化您的体验请下载最新版使用”, #是否钮, , ) = #是钮) 打开指定网址 (“输入网址”) 结束 ()

    代码图示 运行后无异常即可编译 全部代码如下

    .版本 2 .支持库 eAPI .支持库 internet .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .局部变量 当前版本号, 文本型 .局部变量 网络版本号, 文本型 ' 设置程序版本号 当前版本号 = “2.0” ' 检查网络连接 .如果真 (取反 (是否与互联网连接 ())) 信息框 (“当前没有检测到网络连接,请检查网络后重试”, 0, , ) 结束 () .如果真结束 ' 检查软件版本更新 ' '获取网络版本号 网络版本号 = 取指定文本 (到文本 (HTTP读文件 (“输入网址”)), “起始标签”, “结束标签”) .判断开始 (当前版本号 < 网络版本号) .如果真 (信息框 (“为了优化您的体验请下载最新版使用”, #是否钮, , ) = #是钮) 打开指定网址 (“输入网址”) 结束 () .如果真结束 .默认 .判断结束 .子程序 取指定文本, 文本型 .参数 完整文本, 文本型 .参数 起始文本, 文本型 .参数 终止文本, 文本型 .局部变量 待取文本总长度 .局部变量 中间文本, 文本型 .局部变量 取得文本 .局部变量 最终文本, 文本型 待取文本总长度 = 取文本长度 (完整文本) 取得文本 = 寻找文本 (完整文本, 起始文本, , 假) + 取文本长度 (起始文本) 中间文本 = 取文本中间 (完整文本, 取得文本, 待取文本总长度) 待取文本总长度 = 取文本长度 (中间文本) 取得文本 = 寻找文本 (中间文本, 终止文本, , 假) - 1 最终文本 = 取文本中间 (中间文本, 1, 取得文本) 返回 (最终文本)
    最新回复(0)