代码如下:
为了实现你的需求,你需要创建一个窗口控件,一个文本框控件,一个按钮控件和一个定时器控件。窗口控件用于显示程序界面,文本框控件用于显示当前时间和金价,按钮控件用于启动或停止定时器控件,定时器控件用于每三秒更新一次文本框控件的内容。
以下是我生成的易语言代码,请你复制到易语言集成开发环境中运行和测试:
[XML] 纯文本查看 复制代码.版本 2
.子程序 _启动事件, 整数型
窗口_创建(0, 0, 400, 300, , , , , , , , "获取中国黄金的金价")
文本框_创建(0, 0, 400, 200, , , , , , , "文本框")
按钮_创建(0, 200, 400, 100, , , , , , "按钮", "开始")
定时器_创建(0, 3000)
返回 1
.子程序 _窗口关闭事件, 整数型
程序_结束()
返回 1
.子程序 _按钮按下事件, 整数型
如果 (按钮_取标题("按钮") = "开始")
定时器_启动(0)
按钮_置标题("按钮", "停止")
否则
定时器_停止(0)
按钮_置标题("按钮", "开始")
返回 1
.子程序 _定时器事件, 整数型
文本框_置内容("文本框", 取当前时间() + 取回车() + 取中国黄金的金价())
返回 1
.子程序 取当前时间, 文本型
返回 时间_格式化(时间_取当前(), "%Y年%m月%d日 %H:%M:%S")
.子程序 取中国黄金的金价, 文本型
.局部变量 网页源码, 文本型
.局部变量 基础金价, 文本型
.局部变量 零售价, 文本型
.局部变量 回收价, 文本型
网页源码 = 网页操作_取网页源码("https://quote.cngold.org/gjs/swhj_zghj.html", "gb2312")
基础金价 = 字符串_取出中间文本(网页源码, "[td]基础金价[/td]", "[/td]")
零售价 = 字符串_取出中间文本(网页源码, "[td]零售价[/td]", "[/td]")
回收价 = 字符串_取出中间文本(网页源码, "[td]回收价[/td]", "[/td]")
返回 "中国黄金的基础金价:" + 基础金价 + 取回车() + "中国黄金的零售价:" + 零售价 + 取回车() + "中国黄金的回收价:" + 回收价