编辑框内容替换问题

行长

编辑框里面的内容是根据超文本浏览框地址变化而变化的，不特定。如：https://www.baidu.com/s?cl=3&tn=baidutop10&fr=top1000&rsv_idx=2&rsv_dl=fyb_n_homepage&hisfilter=1


我需要的是不管地址怎么变化，编辑框里面的内容都是把域名：www.baidu.com替换掉，比如说替换为：www.sougou.com，再加上域名后面的地址。
那么替换后的效果就是这样的：
https://www.sougou.com//s?cl=3&tn=baidutop10&fr=top1000&rsv_idx=2&rsv_dl=fyb_n_homepage&hisfilter=1


直接附上源码吧！

观音

demo.e (2.64 KB, 下载次数: 12)

2020-8-14 11:39 上传

点击文件名下载附件 是你要的效果吧

小Ye

  

子程序名	返回值类型	公开	备 注
_临时子程序

变量名	类 型	静态	数组	备 注
文本	文本型
替换后的文本	文本型
文本位置	整数型
文本长度	整数型

' 精易模块 文本_替换
文本 ＝ “https://www.baidu.com/s?cl=3& ... age&hisfilter=1”
替换后的文本 ＝ 文本_替换 (文本, , , , “www.baidu.com”, “www.sougou.com”, , , , , , , , )
调试输出 (替换后的文本)
' 不需要模块
文本位置 ＝ 寻找文本 (文本, “www.baidu.com”, , 假)
文本长度 ＝ 取文本长度 (“www.baidu.com”)
替换后的文本 ＝ 取文本左边 (文本, 文本位置 － 1) ＋ “www.sougou.com” ＋ 取文本右边 (文本, 取文本长度 (文本) － 文本长度 － 文本位置 ＋ 1)
调试输出 (替换后的文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _临时子程序<br /> .局部变量 文本, 文本型<br /> .局部变量 替换后的文本, 文本型<br /> .局部变量 文本位置, 整数型<br /> .局部变量 文本长度, 整数型<br /> <br /> ' 精易模块 文本_替换<br /> 文本 ＝ “<a href="https://www.baidu.com/s?cl=3&tn=baidutop10&fr=top1000&rsv_idx=2&rsv_dl=fyb_n_homepage&hisfilter=1" rel="nofollow" rel="nofollow" target="_blank">https://www.baidu.com/s?cl=3& ... age&hisfilter=1</a>”<br /> 替换后的文本 ＝ 文本_替换 (文本, , , , “<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”, “www.sougou.com”, , , , , , , , )<br /> 调试输出 (替换后的文本)<br /> ' 不需要模块<br /> 文本位置 ＝ 寻找文本 (文本, “<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”, , 假)<br /> 文本长度 ＝ 取文本长度 (“<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”)<br /> <br /> 替换后的文本 ＝ 取文本左边 (文本, 文本位置 － 1) ＋ “www.sougou.com” ＋ 取文本右边 (文本, 取文本长度 (文本) － 文本长度 － 文本位置 ＋ 1)<br /> 调试输出 (替换后的文本)

liantan

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
文本	文本型
新文本	文本型

文本 ＝ “https://www.baidu.com/s?cl=3& ... age&hisfilter=1”
新文本 ＝ “www.sougou.com”
调试输出 (子文本替换 (文本, 文本_取出中间文本 (文本, “//”, “/”, , ), 新文本, , , 真))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型<br /> .局部变量 新文本, 文本型<br /> <br /> 文本 ＝ “<a href="https://www.baidu.com/s?cl=3&tn=baidutop10&fr=top1000&rsv_idx=2&rsv_dl=fyb_n_homepage&hisfilter=1" rel="nofollow" rel="nofollow" target="_blank">https://www.baidu.com/s?cl=3& ... age&hisfilter=1</a>”<br /> 新文本 ＝ “www.sougou.com”<br /> 调试输出 (子文本替换 (文本, 文本_取出中间文本 (文本, “//”, “/”, , ), 新文本, , , 真))

行长

改动了一下，效果已经达到，感谢