易语言 文本中删除一部分数据 40
有这么一串数据,我要删除最后一个c到"中的数据(包括c不包括引号,也就是删除例子中的cafggds)然后输出到编辑框
我的思路是先找出这一行里有几个c,再从最后个c往后开始判断,不是"就删掉,是"就停止,然后输出
不太会写。。 展开
给你写好了!
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 X, 文本型
.局部变量 分割, 文本型, , "0"
.局部变量 二次分割, 整数型, , "0"
.局部变量 记录引号位置, 整数型, , "0"
.局部变量 L, 文本型
.局部变量 i, 整数型
.局部变量 内容, 文本型
X = “24cqrgvcsf3422ghcafggds” + #引号 + “12da”
.计次循环首 (取文本长度 (X), i)
L = 取文本中间 (X, i, 1)
加入成员 (分割, L)
.计次循环尾 ()
i = 1
.计次循环首 (取数组成员数 (分割), i)
.如果真 (分割 [i] = “c”)
加入成员 (二次分割, i)
.如果真结束
.如果真 (分割 [i] = #引号)
加入成员 (记录引号位置, i)
.如果真结束
.计次循环尾 ()
调试输出 (二次分割, 记录引号位置)
删除成员 (分割, 二次分割 [取数组成员数 (二次分割)], 到数值 (记录引号位置 [1] - 二次分割 [取数组成员数 (二次分割)]))
i = 1
.计次循环首 (取数组成员数 (分割), i)
内容 = 内容 + 分割 [i]
.计次循环尾 ()
编辑框1.内容 = 内容
2015-02-08
先倒找文本引号,再倒找C,(必须引号在C后面),取中间文本,
然后再子文本代替(前提,这段文本前面不能有相同的,不然也会一起给代替)
广告 您可能关注的内容 |