一个正则表达式的使用

问题： 要把“kk2="10.1.1.258asdf10.1.1.2asfd210.1.1.2abd10.1.1.241"”中的10.1.1.2替代成

使用正则表达式的例子：

 

str=kk2="10.1.1.258asdf10.1.1.2asfd210.1.1.2abd10.1.1.241"

Dim regEx
 Set regEx = New RegExp
 regEx.Pattern = "^10.1.1.2$|^10.1.1.2([^0123456789])|([^0123456789])10.1.1.2$|([^0123456789])10.1.1.2([^0123456789])"
 regEx.IgnoreCase = True
 regEx.Global = True
 str=regEx.replace(str,"$2$3")

其中$1表示正则式中的第一个圆括号中的字符，

其中$2表示正则式中的第二个圆括号中的字符，

其中$3表示正则式中的第三个圆括号中的字符，如此类推

因为匹配的是类似"a10.1.1.2"或"10.1.1.2: "，所以如果直接替换的话会多替换掉一个字符，所以要在的替代字符串中补上被多替换掉的这个字符