变量名 | 类 型 | 静态 | 数组 | 备 注 |
网页源代码 | 文本型 | | |
主要源代码 | 文本型 | | |
首次分割 | 文本型 | | 0 |
i | 整数型 | | |
count | 整数型 | | |
二次分割 | 文本型 | | 0 |
文章源代码 | 文本型 | | 0 |
网页源代码 =
到文本 (网页_访问S (编辑框1.内容, 0, , , , , , , , , , , , 5, , , ,
))
主要源代码 =
文本_取出中间文本 (网页源代码,
“
”,
“”, , )
首次分割 =
分割文本 (主要源代码,
#换行符, )
计次循环首 (取数组成员数 (首次分割
), i
)
如果真 (寻找文本 (首次分割
[i
],
“count = count + 1

重定义数组 (二次分割, 真, count)

二次分割 [count] = 首次分割 [i]


计次循环尾 ()
重定义数组 (文章源代码, 假, i)
重定义数组 (文章地址, 假, i)
重定义数组 (文章标题, 假, i)
计次循环首 (取数组成员数 (二次分割), i)
文章源代码 [i] = 文本_取出中间文本 (二次分割 [i], “”, , )
文章地址 [i] = 文本_取出中间文本 (文章源代码 [i], #引号, #引号 + “>”)
文章标题 [i] = 文本_取出中间文本 (文章源代码 [i], #引号 + “>”, “”)
计次循环尾 ()
窗口1.列表框1.清空 ()
计次循环首 (取数组成员数 (文章地址), i)
窗口1.列表框1.加入项目 (文章标题 [i], i)
计次循环尾 ()