怎么读取word文档然后修改特定的字呢?

tkggeeq

.版本 2
.支持库 eWord2000

.子程序 替换内容, 整数型, 公开, 返回被成功替换的次数,在当前活动文档中替换
.参数 Word文档集, Word文档集
.参数 寻找文本, 文本型
.参数 替换文本, 文本型
.参数 次数, 整数型, 可空, 默认替换1次
.局部变量 WORD内容, 文本型
.局部变量 对象3, 对象
.局部变量 对象4, 对象
.局部变量 变体1, 变体型
.局部变量 变体2, 变体型
.局部变量 变体3, 变体型
.局部变量 N, 整数型

.如果真 (是否为空 (次数))
    次数 ＝ 1
.如果真结束
.计次循环首 (次数, )
    对象3 ＝ Word文档集.取文档对象 ().读对象型属性 (“Content”, ).读对象型属性 (“Find”, )
    对象4 ＝ 对象3.读对象型属性 (“Replacement”, )
    对象4.写属性 (“Text”, 替换文本)
    变体1.赋值 (寻找文本, )
    变体2.赋值 (真, )
    变体3.赋值 (假, )
    .如果真 (对象3.逻辑方法 (“Execute”, 变体1, , , , , , , , 变体3, , 变体2, , , , ))
        N ＝ N ＋ 1

    .如果真结束

.计次循环尾 ()
返回 (N)