大家都知道, 正则表表达式源于 UNIX 系统, 用来处理字符串配匹, 通常用事提取关键字, 对其进行处理. 例如, 本论坛的 UBB 标记处理, 就是通过正则表达式来完成的.
例如:
Public Function regular(str) Dim re As New RegExp re.IgnoreCase = True re.Global = True re.Pattern = ":em(.[^\[]*):" regular = re.Replace(str, "<img src=pic\em$1.gif border=0 align=middle>") End Function |
? regular(":em26:")
返回:
<img src=pic\em26.gif border=0 align=middle>