易语言替换文本内容指定内容替换

.版本 2 .程序集 窗口程序集1 .程序集变量 文本, 文本型 .子程序 __启动窗口_创建完毕 文本 = 读入文本 (打开文件 (取运行目录 () + “\文本.txt”, , ), ) 标签1.标题 = “” .子程序 _按钮1_被单击 .局部变量 数组, 文夲型, , "0" .局部变量 计次, 整数型 .如果真 (取文本长度 (文本) ≠ 取文本长度 (到文本 (到数值 (文本)))) 信息框 (“文本的内容不是数字”, 16, ) 结束 () .如果真结束 .计次循环艏 (取文本长度 (文本), 计次) 加入成员 (数组, 取文本中间 (文本, 计次, 1)) 数组 [计次] = 数值到大写 (到数值 (数组 [计次]), 真) 标签1.标题 = 标签1.标题 + 数组 [计次] .计次循環尾 () 写出文本 (打开文件 (取运行目录 () +

.子程序 _按钮_替换_被单击 .局部变量 局部_是否全部替换, 逻辑型 .如果 (选择框1.选中) 局部_是否全部替换 = 真 局部_是否全部替换 = 假 编辑框_原文本.内容 = 子程序_正则文本替换 (编辑框_原攵本.内容, 编辑框_要替换的文本.内容, 编辑框_用作替换的文本.内容, 局部_是否全部替换) .子程序 子程序_正则文本替换, 文本型 .参数 原文本, 文本型 .参数 偠替换的文本, 文本型 .参数 用作替换的文本, 文本型 .参数 是否全部替换, 逻辑型, 可空 .局部变量 表达式, 正则表达式 表达式.创建 (要替换的文本, ) 返回 (表達式.替换 (原文本, 用作替换的文本, 1, , 真, 是否全部替换))

来源:三叶资源网欢迎分享,公众号:iisanye()

我要回帖

更多关于 易语言替换文本内容 的文章

 

随机推荐