| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_窗口1 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| str | 文本型 | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 文本 | 文本型 | | |
| 数组 | 文本型 | | 0 |
| 循环 | 整数型 | | |
| 索引 | 整数型 | | |
| 文本1 | 文本型 | | |
初始化省份信息 ()组合框1.现行选中项 ＝ 0
取监控xx (组合框1.内容
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 全国xx | 文本型 | | |
| 正则表达式 | 正则表达式类 | | |
| 循环次数 | 整数型 | | |
str ＝
编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://sa.sogou.com/new-weball/page/sgs/epidemic?type_page=WEB”, 0, ,
))
)全国xx ＝
文本_取出中间文本 (str,
#地区前, #地区后, ,
)正则表达式.
创建 ( #省正则规则, 全国xx, , , ,
)
计次循环首 (正则表达式.
取匹配数量 (), 循环次数
)
组合框1.
加入项目 (正则表达式.
取子匹配文本 (循环次数, 1,
),
)
计次循环尾 ()|
| _超级列表框1_鼠标右键被按下 | 逻辑型 | |
|
| 横向位置 | 整数型 | | | |
纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
判断 (超级列表框1.
取列标题 (0
) ＝
“省份”)
返回 ()
超级列表框1.置列标题 (0, “省份”)超级列表框1.
全部删除 ()取监控xx (组合框1.内容
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 地区信息 | 文本型 | | |
| 正则 | 正则表达式类 | | |
| 正则1 | 正则表达式类 | | |
| 循环次数 | 整数型 | | |
| N | 整数型 | | |
| 索引 | 整数型 | | |
| 位置信息 | 双精度小数型 | | |
str ＝
编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://sa.sogou.com/new-weball/page/sgs/epidemic?type_page=WEB”, 0, ,
))
)窗口1.标题 ＝
“疫情实时监控 获取时间：” ＋
文本_取出中间文本 (str,
#常量3, #常量4, ,
)地区信息 ＝
文本_取出中间文本 (str,
#地区前, #地区后, ,
)正则.
创建 ( #省正则, 地区信息,
)计次循环首 (正则.
取匹配数量 (), 循环次数
)判断 (寻找文本 (正则.
取子匹配文本 (循环次数, 1,
), 省份, ,
假) ≠ -1
)正则1.
创建 ( #常量5, 正则.
取子匹配文本 (循环次数, 1
))
超级列表框1.
置列标题 (0,
文本_取出中间文本 (正则.
取子匹配文本 (循环次数, 1
),
#常量7, #常量6, ,
) ＋
“所属市”)超级列表框1.
全部删除 ()计次循环首 (正则1.
取匹配数量 (), N
)索引 ＝ 超级列表框1.
插入表项 (, , , , ,
)超级列表框1.
置标题 (索引, 0, 正则1.
取子匹配文本 (N, 1,
))
判断 (正则1.
取子匹配文本 (N, 1,
) ＝ 省份
)位置信息 ＝ N － 1
超级列表框1.置标题 (索引, 1, 正则1.取子匹配文本 (N, 2, ))超级列表框1.
置标题 (索引, 2, 正则1.
取子匹配文本 (N, 3,
))
超级列表框1.
置标题 (索引, 3, 正则1.
取子匹配文本 (N, 4,
))
超级列表框1.
置标题 (索引, 4, 正则1.
取子匹配文本 (N, 5,
))
超级列表框1.现行选中项 ＝ 位置信息
计次循环尾 ()
计次循环尾 ()取监控xx (组合框1.内容
)
谢谢更新源码。
牛逼