VBScriptのReplace()関数は、チョー遅い！

VBScriptのReplace()関数が遅い？と思ったことありませんか？
そこで試してみました。
置換回数(ｎ)が多いと、ｏ(ｎ**2)で？、遅くなるようです。

a=String(1024*1024,"a")
t1=Timer
b=Replace(a,"a","b")
MsgBox Timer-t1
' 33.125

一方、RegExpのReplace()メソッドは、チョー速い！

a=String(1024*1024,"a")
t1=Timer
Set re=New RegExp
re.Global=True
re.Pattern="a"
b=re.Replace(a,"b")
MsgBox Timer-t1
' 0.1875

RegExpのReplace()メソッドを使いましょう。