精易模块：文本_寻找出文本并删除.有问

う网淅乄

[e].版本 2

.子程序 _按钮1_被单击
.局部变量 要删除的文本, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 文本, 文本型

文本_取中间_批量 (编辑框1.内容, “<”, “>”, 要删除的文本, , , , “<”, “>”, )
文本 ＝ 编辑框1.内容
.计次循环首 (取数组成员数 (要删除的文本), i)
    文本 ＝ 子文本替换 (文本, 要删除的文本 , “”, , , 真)
.计次循环尾 ()
编辑框2.内容=文本
[/e]

源码在附件 你看看.rar (617.05 KB, 下载次数: 16)

2011-11-7 15:25 上传

点击文件名下载附件

千年

1. .版本 2
   
2. .支持库 RegEx
   
3. 
   
4. .子程序 _按钮1_被单击
   
5. .局部变量 原始数据, 文本型
   
6. .局部变量 正则, 正则表达式
   
7. .局部变量 结果, 搜索结果, , "0"
   
8. .局部变量 文本, 文本型
   
9. .局部变量 计次, 整数型
   
10. 
    
11. 原始数据 ＝ 编辑框1.内容
    
12. 正则.创建 (“<(.[^>]*)>”, 假)
    
13. 结果 ＝ 正则.搜索全部 (原始数据)
    
14. 文本 ＝ 原始数据
    
15. .计次循环首 (取数组成员数 (结果), 计次)
    
16. 文本 ＝ 子文本替换 (文本, 结果 [计次].取子匹配文本 (原始数据, 0, ), “”, , , 真)
    
17. .计次循环尾 ()
    
18. 编辑框2.内容 ＝ 文本
    

复制代码

[e]
.版本 2
.支持库 RegEx
.子程序 _按钮1_被单击
.局部变量 原始数据, 文本型
.局部变量 正则, 正则表达式
.局部变量 结果, 搜索结果, , "0"
.局部变量 文本, 文本型
.局部变量 计次, 整数型
原始数据 ＝ 编辑框1.内容
正则.创建 (“<(.[^>]*)>”, 假)
结果 ＝ 正则.搜索全部 (原始数据)
文本 ＝ 原始数据
.计次循环首 (取数组成员数 (结果), 计次)
    文本 ＝ 子文本替换 (文本, 结果 [计次].取子匹配文本 (原始数据, 0, ), “”, , , 真)
.计次循环尾 ()
编辑框2.内容 ＝ 文本
[/e]

我想楼主应该是不想要那些html标记的！！！

exit11

千年 发表于 2011-11-7 15:16
我想楼主应该是不想要那些html标记的！！！

正则有替换

.版本 2
.支持库 RegEx
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 原始数据, 文本型
.局部变量 正则, 正则表达式
.局部变量 结果, 搜索结果, , "0"
.局部变量 文本, 文本型
.局部变量 计次, 整数型

原始数据 ＝ 编辑框1.内容
正则.创建 (“<(.[^>]*)>”, 假)
结果 ＝ 正则.搜索全部 (原始数据)
调试输出 (正则.替换 (编辑框1.内容, “”, 1, , 真, 真))

魅力

shi6718298 发表于 2011-11-7 14:52
源码来了啊修改一下

谢谢你啊。学习了。谢谢你

魅力

就是把所有“<”到“>”之间的内容全部删除并删除“<”和“>”。谢谢10楼。学习了。.版本 2

.子程序 _按钮1_被单击
.局部变量 临时文本, 文本型, , "0"
.局部变量 t, 整数型
.局部变量 a, 整数型
.局部变量 最终文本, 文本型

文本_取中间_批量 (编辑框1.内容, “<”, “>”, 临时文本)
t ＝ 取数组成员数 (临时文本)

.如果 (t ＝ 1)
    编辑框2.内容 ＝ 文本_寻找出文本并删除 (编辑框1.内容, “<”, “>”)
.否则
    最终文本 ＝ 编辑框1.内容
    .计次循环首 (t, a)

        最终文本 ＝ 文本_寻找出文本并删除 (最终文本, “<”, “>”)

    .计次循环尾 ()
    编辑框2.内容 ＝ 最终文本
.如果结束