.版本 2 .程序集 窗口程序集_启动窗口 .子程序 _按钮1_被单击 .局部变量 文本, 文本型 文本 ＝ 网页_访问S (“http://www.weather.com.cn/weather1d/101200501.shtml”, 0) 取今日天气 (文本) 取当前时间 () .子程序 取今日天气 .参数 文本, 文本型 .局部变量 正则, 正则表达式类 .局部变量 天气, 文本型 正则.创建 (#常量1, 文本, , , , ) 天气 ＝ 正则.取子匹配文本 (1, 1, ) 窗口_写字 (, 天气, , 24, #蓝色, , ) .子程序 取当前时间 窗口_写字 (, 到文本 (时间_取北京时间 ()), , 24, #红色, 0, 50)