易语言如何删除编辑框所有行开头几个字包括符号
例子,目前三个控件,一个按钮,两个编辑框我要在按钮被单击的时候,会删除编辑框1所有行的前几个字符(需要删除的字符数就是读取编辑框2的内容)谁可以写一个源码发给我,邮箱23...
例子,
目前三个控件, 一个按钮,两个编辑框
我要在按钮被单击的时候,会删除编辑框1所有行的前几个字符(需要删除的字符数就是读取编辑框2的内容)
谁可以写一个源码发给我,邮箱 2363750@qq.com
若编辑框2的内容为5则删除每行前五个字符,若为10则删除每行前10个字符,
就这样的 展开
目前三个控件, 一个按钮,两个编辑框
我要在按钮被单击的时候,会删除编辑框1所有行的前几个字符(需要删除的字符数就是读取编辑框2的内容)
谁可以写一个源码发给我,邮箱 2363750@qq.com
若编辑框2的内容为5则删除每行前五个字符,若为10则删除每行前10个字符,
就这样的 展开
1个回答
展开全部
.版本 2
.程序集 窗口程序集1
.程序集变量 文本组, 文本型, , "0"
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 = 真
编辑框1.滚动条 = 2
编辑框1.内容 = 到文本 (读入文件 (“D:\123.txt”))
文本组 = 分割文本 (编辑框1.内容, #换行符, )
.子程序 _按钮1_被单击
.如果真 (到数值 (编辑框2.内容) ≤ 0)
返回 ()
.如果真结束
编辑框1.内容 = “”
.计稿扮次循环首 (取数组成员数 (文咐敬咐本组), 计次)
.如果真 (取文本长度 (文本组 [计次]) ≤ 到数值 (编辑框2.内容))
文衡纯本组 [计次] = “”
到循环尾 ()
.如果真结束
文本组 [计次] = 取文本右边 (文本组 [计次], 取文本长度 (文本组 [计次]) - 到数值 (编辑框2.内容))
编辑框1.加入文本 (文本组 [计次], #换行符)
.计次循环尾 ()
' 写到文件 (“D:\123.txt”, 到字节集 (编辑框1.内容))
.程序集 窗口程序集1
.程序集变量 文本组, 文本型, , "0"
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 = 真
编辑框1.滚动条 = 2
编辑框1.内容 = 到文本 (读入文件 (“D:\123.txt”))
文本组 = 分割文本 (编辑框1.内容, #换行符, )
.子程序 _按钮1_被单击
.如果真 (到数值 (编辑框2.内容) ≤ 0)
返回 ()
.如果真结束
编辑框1.内容 = “”
.计稿扮次循环首 (取数组成员数 (文咐敬咐本组), 计次)
.如果真 (取文本长度 (文本组 [计次]) ≤ 到数值 (编辑框2.内容))
文衡纯本组 [计次] = “”
到循环尾 ()
.如果真结束
文本组 [计次] = 取文本右边 (文本组 [计次], 取文本长度 (文本组 [计次]) - 到数值 (编辑框2.内容))
编辑框1.加入文本 (文本组 [计次], #换行符)
.计次循环尾 ()
' 写到文件 (“D:\123.txt”, 到字节集 (编辑框1.内容))
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询