欢迎加入我们，一同切磋技术。 &
用户名： &&&
密　码： &
共有 489 人关注过本帖
标题：求助，本人在做一个替换功能的软件，但是出错了，请问问题出现在哪里
等　级：新手上路
&&已结贴√
&&问题点数：20&&回复次数：7&&&
求助，本人在做一个替换功能的软件，但是出错了，请问问题出现在哪里
Private Sub Command1_Click()
Text2.Text = Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Text1.Text, &0&, &05&), &1&, &0A&), &2&, &03&), &3&, &00&), &4&, &09&), &5&, &0E&), &6&, &07&), &7&, &02&), &8&, &0C&), &9&, &0F&), &A&, &9A&), &B&, &93&), &C&, &90&), &D&, &99&), &E&, &9E&), &F&, &97&), &G&, &92&), &H&, &9C&), &I&, &9F&), &J&, &??&), &K&, &94&), &L&, &98&), &M&, &??&), &N&, &9B&), &O&, &??&), &P&, &E5&), &Q&, &EA&), &R&, &E3&), &S&, &E0&), &T&, &E9&), &U&, &EE&), &V&, &E7&), &W&, &E2&), &X&, &EC&), &Y&, &EF&), &Z&, &??&), & &, &35&), &-&, &36&)
&&本来1要换成0A的，结果换成了09A了，求解救
搜索更多相关主题的帖子:
等　级：贵宾
威　望：26
帖　子：734
专家分：3478
回复 楼主 wlh
写得太有内涵了，不容易看
等　级：贵宾
威　望：116
帖　子：1526
专家分：8558
这个应该可以大大简化的
能编个毛线衣吗？
等　级：贵宾
威　望：26
帖　子：734
专家分：3478
这样嵌套不合适，比如0换为05了，在执行5换05的时候又要被换为0e
这样嵌套也费时间，应该逐字符转换
等　级：贵宾
威　望：82
帖　子：3988
专家分：26885
1换成09A，结果正确。
等　级：版主
威　望：155
帖　子：3687
专家分：22066
第一步， &1&, &0A&
第二步， &A&, &9A&
所以， 1 变成了 09A ，***是这个了。
这种很多个字符都需要替换的，并且互相会干扰的，应该按 4楼提了那种逐字符进行替换。
dim s1 as string,s2 as string,s3 as string
dim i as long
s1=text1.text
for i=1 to len(s1)
&&s2=mid(s1,i,1)
&&select case s2
&&case &0&
&&&&&s3=s3 & &05&
&&case &1&
&&&&&s3=s3 & &0A&
&&case&&&G&,&g&
&&&&&s3=s3 &&&&92&
&&case else
&&&&&s3=s3 & s2
end select case
授人于鱼，不如授人于渔
早已停用QQ了
来　自：神界
等　级：贵宾
威　望：343
帖　子：11227
专家分：44401
这样的代码看着迷糊&&极难维护
DO IT YOURSELF !
来　自：文来中学
等　级：贵宾
威　望：28
帖　子：297
专家分：990
这种程序我做过，我的方法是：
将每个A啊B啊C啊都变成“A ”，“B ”等等
然后Replace时，改为：
Replace(xxx,&A &,xxx)
这样就不会重复了
同时比较容易看懂
当然，空格可以替换为其他字符，这只是一个标示符而已
编程蛋疼的不是枯燥，而是辛辛苦苦编完几千行的代码，运行，“Runtime Error “xxx””。
版权所有，并保留所有权利。
Powered by , Processed in 0.022971 second(s), 8 queries.
Copyright&, BCCN.NET, All Rights Reserved> SetupFactory打包问题请教一个小问题：vb6.0做的程序，代码有改动以后，用SetupF
SetupFactory打包问题请教一个小问题：vb6.0做的程序，代码有改动以后，用SetupF
jackwayne & &
发布时间： & &
浏览：22 & &
回复：1 & &
悬赏：0.0希赛币
SetupFactory打包问题请教一个小问题：vb6.0做的程序，代码有改动以后，用SetupFactory重新打包，是否只需要在vb中重新生成EXE，然后替换掉setupfactory里的文件就可以了？
修改过代码的话需要重新生成可执行文件，将打包工程文件中的原可执行文件替换掉，然后再次打包即可。jackwuzhidong & &
08:41:24 & &
& & （0）（0）
本问题标题：
本问题地址：
温馨提示：本问题已经关闭，不能解答。
暂无合适的专家
&&&&&&&&&&&&&&&
希赛网 版权所有 & &&