新手请教一个循环替换问题

来源:互联网 发布:性价比高的护肤品知乎 编辑:程序博客网 时间:2024/06/04 19:30

 textarea = request.form("textarea")
 dim BFchar(10),LTchar(10)
 BFchar(0) = "aa0"
 BFchar(1) = "aa1"
 ...
 BFchar(10) = "aa10"

 LTchar(0) = "bb0"
 LTchar(1) = "bb1"
 ...
 LTchar(10) = "bb10"

 for i = 0 to  ubound(BFchar)
   if instr(textarea,BFchar(i)) > 0 then 
      textarea = replace(textarea,BFchar(i),LTchar(i))
      response.write textarea
   end if 
 next
 ...
 '如果request.from("textarea")= "aa0aa1aa2"的话,经上面代码替换后会输出:
 'bb0aa1aa2bb0bb1aa2bb0bb1bb2 现在我只想要替换后bb0bb1bb2的结果,要如何改??谢谢!!

0 0
原创粉丝点击