易语言取网页中的一段文字到编辑框 有源码的来

.版本 2
.支持库 internet
.程序集 窗口程序集1
.程序集变量 开奖结果, 文本型
.程序集变量 文本长度, 整数型
.程序集变量 位置一, 整数型
.程序集变量 文本一, 文本型
.程序集变量 位置二, 整数型
.程序集变量 文本二, 文本型
.程序集变量 期位, 整数型
.程序集变量 号位, 整数型
.程序集变量 中奖号码, 文本型
.程序集变量 特码, 文本型
.程序集变量 码号, 整数型
.程序集变量 特码长度, 整数型
.程序集变量 颜色号, 整数型
.程序集变量 颜色, 文本型
.子程序 __启动窗口_创建完毕
文本分析 ()
编辑框1.内容 ＝ 中奖期数 ＋ 中奖号码 ＋ “特号：” ＋ 特码 ＋ “ ” ＋ 颜色

.子程序 文本分析
开奖结果 ＝ 到文本 (HTTP读文件 (“http://l.5v.hk:888/bm.htm”))
文本长度 ＝ 取文本长度 (开奖结果)
位置一 ＝ 寻找文本 (开奖结果, “start_score”, , 假)
文本一 ＝ 取文本右边 (开奖结果, 文本长度 － 位置一)
位置二 ＝ 寻找文本 (文本一, “strt_score”, , 假)
文本二 ＝ 取文本左边 (文本一, 位置二)
位置一 ＝ 寻找文本 (文本二, “>文本长度 ＝ 取文本长度 (文本二)
文本一 ＝ 取文本右边 (文本二, 文本长度 － 位置一)
期位 ＝ 寻找文本 (文本一, “>”, , 假)
文本长度 ＝ 取文本长度 (文本一)
中奖期数 ＝ 取文本右边 (文本一, 文本长度 － 期位)
期位 ＝ 寻找文本 (中奖期数, “<”, , 假)
中奖期数 ＝ 取文本左边 (中奖期数, 期位 － 1)
号位 ＝ 寻找文本 (文本一, “”, , 假)
文本长度 ＝ 取文本长度 (文本一)
中奖号码 ＝ 取文本右边 (文本一, 文本长度 － 号位 － 2)
特码 ＝ 中奖号码
号位 ＝ 寻找文本 (中奖号码, “”, , 假)
中奖号码 ＝ 取文本左边 (中奖号码, 号位 － 1)
码号 ＝ 寻找文本 (特码, “>”, , 假)
特码长度 ＝ 取文本长度 (特码)
特码 ＝ 取文本右边 (特码, 特码长度 － 码号 － 3)
码号 ＝ 寻找文本 (特码, “<”, , 假)
特码 ＝ 取文本左边 (特码, 码号 － 1)
颜色号 ＝ 寻找文本 (文本一, “ ”, , 假)
颜色 ＝ 取文本右边 (文本一, 文本长度 － 颜色号 － 14)
颜色号 ＝ 寻找文本 (颜色, “”, , 假)
颜色 ＝ 取文本左边 (颜色, 颜色号 － 1)

.版本 2
.子程序 取指定内容, 文本型, , 取出想要的内容
.参数 完整内容, 文本型
.参数 左边文本, 文本型
.参数 右边文本, 文本型
.局部变量 临时位置, 整数型
.局部变量 总长度, 整数型
.局部变量 临时文本, 文本型
总长度 ＝ 取文本长度 (完整内容)
临时位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)
临时文本 ＝ 取文本中间 (完整内容, 临时位置, 总长度)
总长度 ＝ 取文本长度 (临时文本)
临时位置 ＝ 寻找文本 (临时文本, 右边文本, , 假) － 1
临时文本 ＝ 取文本中间 (临时文本, 1, 临时位置)
返回 (临时文本)

把上面的子程序加进去，然后再调用这个子程序来取出指定文本就可以了。只要你在其参数中提供前面的文本跟后面的文本就可以取出中间的文本。