（易语言）我想做一个文本替换的软件但效果和我预想的有些偏差，大家帮我看一下

试试我这个吧。。。。希望能帮你

主要是这个

.版本 2

.支持库 eWord2000

.子程序 Word替换, 整数型, , 返回被成功替换的次数

.参数 Word文档集, Word文档集

.参数 查找文本, 文本型

.参数 替换文本, 文本型

.参数 次数, 整数型

.局部变量 WORD内容, 文本型

.局部变量 对象, 对象

.局部变量 对象2, 对象

.局部变量 对象3, 对象

.局部变量 对象4, 对象

.局部变量 变体1, 变体型

.局部变量 变体2, 变体型

.局部变量 变体3, 变体型

N ＝ 0

.计次循环首 (次数, )

    对象 ＝ Word文档集.取文档对象 ()

    对象2 ＝ 对象.读对象型属性 (“Content”, )

    对象3 ＝ 对象2.读对象型属性 (“Find”, )

    对象4 ＝ 对象3.读对象型属性 (“Replacement”, )

    对象4.写属性 (“Text”, 替换文本)

    变体1.赋值 (查找文本, )

    变体2.赋值 (真, )

    变体3.赋值 (假, )

    .如果真 (对象3.逻辑方法 (“Execute”, 变体1, , , , , , , , 变体3, , 变体2, , , , ))

        N ＝ N ＋ 1

    .如果真结束

.计次循环尾 ()

返回 (N)