telking 发表于 2008-6-25 14:30:32

如何删除字符串的内容

一个字符串,需要删除里面的字符(不一定存在有),比如字符串“联想电脑暑期促销报价”,这个有可能是(联想、惠普、华硕、宏碁),目的是将其它品牌名字都替换掉,都换成“广东电脑暑期促销报价”,麻烦写段源码来参考下

[ 本帖最后由 telking 于 2008-6-26 13:51 编辑 ]

顽固不化 发表于 2008-6-25 15:20:23

Dim $A
$A="联想"
$A="惠普"
$A="华硕"
$A="宏碁"
$newWord="广东"
$OLDSTR="宏碁电脑暑期促销报价"

For $i=1 to UBound($A)-1
        $OLDSTR=StringReplace($OLDSTR,$A[$i],$newWord)
Next

MsgBox(0,"",$OLDSTR)

rho123 发表于 2008-6-25 15:30:52

呵呵,字符替换。。没仔细看帮助吧。。。

telking 发表于 2008-6-25 16:02:49

看了帮助,因为要替换的比较多,所以想找到比较简练的代码
如何批量删除指定字符串?

[ 本帖最后由 telking 于 2008-6-25 17:34 编辑 ]

andywth 发表于 2008-6-25 16:16:36

可以把所有可能需要替换的词语都写在程序里,也可以写在ini里,方便以后删减词语,然后用stringreplace来替换.

对于程序来说没有简便的方法,只有你告诉程序所有的可能性. 电脑永远没有人脑智能哦:)

telking 发表于 2008-6-25 18:11:51

$avArray = _ArrayCreate("JPM", "Holger", "Jon", "Larry", "Jeremy", "Valik", "Cyberslug", "Nutster", "Tylo", "JdeB")
能不能用数组创建来解决?

netegg 发表于 2008-6-25 21:25:35

原帖由 telking 于 2008-6-25 18:11 发表 http://www.autoitx.com/images/common/back.gif
$avArray = _ArrayCreate("JPM", "Holger", "Jon", "Larry", "Jeremy", "Valik", "Cyberslug", "Nutster", "Tylo", "JdeB")
能不能用数组创建来解决?

应该可以
用个for $i in $avArray.....next

auto 发表于 2008-6-25 21:30:51

二楼是采用数组解决楼主提出的问题

kakinkgb 发表于 2008-6-25 22:55:01

原帖由 telking 于 2008-6-25 18:11 发表 http://www.autoitx.com/images/common/back.gif
$avArray = _ArrayCreate("JPM", "Holger", "Jon", "Larry", "Jeremy", "Valik", "Cyberslug", "Nutster", "Tylo", "JdeB")
能不能用数组创建来解决?
_ArrayCreate这是哪来的UDF?

sanhen 发表于 2008-6-25 23:42:28

这个是旧版的,新版取消了这个函数。
页: [1]
查看完整版本: 如何删除字符串的内容