Access使用正则表达式_access模块-access类模块-access函数-access VBA

Access使用正则表达式

时间：2013-08-28 17:45 来源：office中国作者：zhuyiwen 阅读：次

所谓正则表达式就是用来匹配字符串的，通常用来检索或替换那些符合的内容。如：提取电话号码，或者判断输入的是否为真实的身份证。

在使用之前，需先引用 Microdoft VBScript Regular Expressions 5.5 或者 Microdoft VBScript Regular Expressions 1.0, 才可以使用 VBScript 的正则表达式.

如下面的示例：

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

==============================================================================
Debug.Print regular("[em26]")
返回:
<img src=pic\em26.gif border=0 align=middle>

扩展：
正则表达式30分钟入门教程： http://www.office-cn.net/forum.php?mod=viewthread&tid=116282
继往开来--用正则表达式提取信息示例： http://www.office-cn.net/forum.php?mod=viewthread&tid=116555

(责任编辑：admin)

顶一下

(0)

踩一下

(0)

上一篇：Access如何为不够位数的添加0（补零格式函数）
下一篇：Access对象感叹号(!)(.)的区别