如果没有找到就不替换... 如果没有找到就不替换
一个列表框二个按钮。
局部变量 文件路径 文本型
局部变量 文件名称 文本型
文件路径="C:\文件夹名称\*.txt"
文件名称=寻找文件(文件路径,)
判断循环首(文件名称≠"")
.版本 2
.子程序 _按钮1_被单击
.局部变量 文件路径, 文本型
.局部变量 文件名称, 文本型
文件路径 = “C:\知道测试\*.txt”
文件洺称 = 寻找文件 (文件路径, )
.判断循环首 (文件名称 ≠ “”)
列表框1.加入项目 (取文本左边 (文件路径, 取文本长度 (文件路径) - 5) + 文件名称, )
文件名称 = 寻找文件 (, )
处理事件 ()
.判断循环尾 ()
.子程序 _按钮2_被单击
.局部变量 文本内容, 文本型
.局部变量 n, 整数型
.计次循环首 (列表框1.取项目数 (), n)
文本内容 = 到文本 (读入攵件 (列表框1.取项目文本 (n - 1)))
.如果真 (寻找文本 (文本内容, “我爱你”, , 假) ≠ -1)
文本内容 = 子文本替换 (文本内容, “我爱你”, “我恨你”, , , 真)
写到文件 (列表框1.取项目文本 (n - 1), 到字节集 (文本内容))
.如果真结束
处理事件 ()
.计次循环尾 ()
信息框 (“内容替换成功!”, 0, , )
图片看不清就复制上面文本内容到易语言芓节集替换里面粘贴
文件路径,替换内容自己改
你对这个回答的评价是