导航
全部
Ada助手
...
Ada助手
登录/注册
社区
VB基础类
帖子详情
vb字符串多重替换问题
jacklee19822001
2003-12-01 12:18:47
想做个可疑替换多个字符串的工具,就是说一下子可以替换多个字符串,
不过有个问题
比如,aaa要替换成aba
bab要替换成ccc
下列字符串
aaabab
用先全部替换一个再替换下一个的方法替换后就成了
aaabab->ababab->acccab
应该是
abaccc的
怎么解决阿?
...全文
给本帖投票
454
13
打赏
收藏
vb字符串多重替换问题
想做个可疑替换多个字符串的工具,就是说一下子可以替换多个字符串, 不过有个问题 比如,aaa要替换成aba bab要替换成ccc 下列字符串 aaabab 用先全部替换一个再替换下一个的方法替换后就成了 aaabab->ababab->acccab 应该是 abaccc的 怎么解决阿?
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
13 条
回复
切换为时间正序
请发表友善的回复…
发表回复
发表回复
按下Enter换行,Ctrl+Enter发表内容
编辑
预览
轻敲空格完成输入
显示为
卡片
标题
链接
打赏红包
dlpseeyou
2003-12-02
打赏
举报
回复
replace(str,'aaa','aba')
replace(str,'bab','ccc')
jpinglee
2003-12-02
打赏
举报
回复
用一些"罕见字符"来做肯定存在"安全隐患",用定长,变长字符来做不过又有点麻烦
Zedee
2003-12-01
打赏
举报
回复
记录一下当前操作到第几个字符
jacklee19822001
2003-12-01
打赏
举报
回复
这样还不是很保险阿,如果要替换的字符串或替换成的字符串中有这些罕见字符串呢?
northwolves
2003-12-01
打赏
举报
回复
呵呵,先用罕见字符中间变量作替换,再执行相应操作,应该比较快的,如:
Private Sub Command1_Click()
Dim x As String
x = "aaabab"
x = Replace(x, "aaa", "@@@")
x = Replace(x, "bab", "###")
x = Replace(x, "@@@", "aba")
x = Replace(x, "###", "ccc")
MsgBox x
dxqylzg
2003-12-01
打赏
举报
回复
up
TimLee✿
2003-12-01
打赏
举报
回复
先换成看不到的而且一般又用不到的字符比如ASCII为1的chr(1)哈哈!这个总该可以了把?
flc
2003-12-01
打赏
举报
回复
关注
yunfeng007
2003-12-01
打赏
举报
回复
二义性问题如果没有规则的话,对于机器来说,是不可能解决的。
例如aa->bb aaa->cc aaaa->bbcc,那么对于aaaaaaaaa你怎么来替换?除非你有一套规则,按照规则将之分解,例如你的规则是对于aaaaaaaaa来说,他表示为aa aaaa aaa,这样就可以替换了。
其实你的问题已经涉及到编译原理了,多看看这方面的书吧,对你肯定有启发的。
SoHo_Andy
2003-12-01
打赏
举报
回复
要实现你的要求的前提是对包含你要替换的字符串的内容做出语义分析
比如罕见字符”中介法本身就是一个语义分析的过程,如果想做到非常理想,
这个分析过程本身就会是一个复杂的算法,如果简单点的话,那就要引入用户
交互,减少程序误差。即在每次进行一组字符串替换之前都做语义分析,并
由用户来完成语义分析是否正确的判断,这样循环进行来实现你的要求
如果要替换的字符串非常大,则实现之后的具体应用价值也不大,因为用户不可能
一个个的去判断语义分析是否合理
northwolves
2003-12-01
打赏
举报
回复
适当更改,比方说,你的字符串不会有 string(50,"@")吧?
x = Replace(x, "aaa",string(50,"@"))
x = Replace(x, string(50,"@"), "aba")
boydgmx
2003-12-01
打赏
举报
回复
“罕见字符”中介法虽然可以用,但不是万能的。
分析你的基本需求,就可以看出你的这种需求本身就带有二义性。
也就是说,不管你怎么替换,程序总是无法确定babab这种字符串该如何替换。
对于这种问题,程序应该事先作出判断,也就是说先进行一次“预替换”,如果发现
存在二义性,则提示用户,让用户指定如何替换。
jacklee19822001
2003-12-01
打赏
举报
回复
现在就只能用“罕见字符”中介法,希望大家有更好的提议,我可以在开帖散分
VB
编程资源大全(源码
字符串
)
1,strs.zip
实现字节数组, 同c中的字符数组一样好用(6KB)
2,modules.zip
字符串
处理的12个例子(13KB)
3,strings.zip
字符串
处理函数(4KB)
4,stringfuncs.zip
字符串
处理函数(9KB)
5,search&replace.zip
字符串
查找和
替换
的实现例子(1KB)
6,search_and_replace.zip
字符串
查找和
替换
的实现例子(1KB)
7,quiksort.zip
字符的快速排序算法(12KB)
8,parsestring.zip
分解
字符串
(3KB)
9,wordwrap6.zip
包装单并输出到文本的例子(2KB)
10,autofill.zip
使用列表框和组合框的自动填充特性快速查找一个子项(4KB)
11,wordwrap4.zip
包装单并输出到打印机的例子(6KB)
12,rotfont.zip
用
VB
实现字体的旋转
VB
源码(4KB)
13,txtoutline.zip
实现文本的描边和空心字的源代码(17KB)
14,multiundo.zip
RichTextBox 控件中
多重
撤销重做的源代码(13KB)
15,progbar2.zip
自己动手做一个进程杆控件(6KB)
16,195.zip
字符串
操作完全演示(9KB)
17,126.zip
实现 richtext 控件的多步undo操作(6KB)
18,93.zip
演示快速排序算法(12KB)
19,62.zip
子分类技术的应用 (3KB)
20,45.zip
用
VB
写“多线程”程序(9KB)
21,190.zip
字符串
查找和
替换
的实现例子(1KB)
22,191.zip
字符串
处理的12个例子(13KB)
23,192.zip
检测文件中是否包含指定
字符串
(1KB)
VB
编程资源大全(英文源码
字符串
)
1,strs.zip
实现字节数组, 同c中的字符数组一样好用(6KB)
2,modules.zip
字符串
处理的12个例子(13KB)
3,strings.zip
字符串
处理函数(4KB)
4,stringfuncs.zip
字符串
处理函数(9KB)
5,search&replace.zip
字符串
查找和
替换
的实现例子(1KB)
6,search_and_replace.zip
字符串
查找和
替换
的实现例子(1KB)
7,quiksort.zip
字符的快速排序算法(12KB)
8,parsestring.zip
分解
字符串
(3KB)
9,wordwrap6.zip
包装单并输出到文本的例子(2KB)
10,autofill.zip
使用列表框和组合框的自动填充特性快速查找一个子项(4KB)
11,wordwrap4.zip
包装单并输出到打印机的例子(6KB)
12,rotfont.zip
用
VB
实现字体的旋转
VB
源码(4KB)
13,txtoutline.zip
实现文本的描边和空心字的源代码(17KB)
14,multiundo.zip
RichTextBox 控件中
多重
撤销重做的源代码(13KB)
15,progbar2.zip
自己动手做一个进程杆控件(6KB)
16,195.zip
字符串
操作完全演示(9KB)
17,126.zip
实现 richtext 控件的多步undo操作(6KB)
18,93.zip
演示快速排序算法(12KB)
19,62.zip
子分类技术的应用 (3KB)
20,45.zip
用
VB
写“多线程”程序(9KB)
21,190.zip
字符串
查找和
替换
的实现例子(1KB)
22,191.zip
字符串
处理的12个例子(13KB)
23,192.zip
检测文件中是否包含指定
字符串
(1KB)
EfsFrame 帮助文档
Efs 前台脚本开发工具帮助文档--XML编程简介
2021-2022计算机二级等级考试试题及答案No.18236.docx
2021-2022计算机二级等级考试试题及答案No.18236.docx
Visual Basic Language Specification 10.0 语言规范
Visual Basic Language Specification 10.0 语言规范
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
积分榜
荣誉榜
原力榜
学习榜
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章
手机看
关注公众号
客服
返回
顶部