如何在ACCESS中使用正则表达式
& n5 I& A9 @4 x& @2 H7 s5 ~通过引用 Microdoft VBScript Regular Expressions 5.5 或者 Microdoft VBScript Regular Expressions 1.0, 则可以使用 VBScript 的正则表达式, 实现字符串匹配和替换。 " x1 B+ y ^. C4 {8 U
大家都知道, 正则表表达式源于 UNIX 系统, 用来处理字符串配匹, 通常用事提取关键字, 对其进行处理. 例如, 本论坛的 UBB 标记处理, 就是通过正则表达式来完成的.
, P) q: [1 J7 i) s 例如/ P) S0 ?9 C1 m- ?7 `2 R4 t
Public Function regular(str); }: ^0 y- i' x! \
Dim re As New RegExp
5 `1 X* v; C1 V4 l1 C5 G" E re.IgnoreCase = True
+ ~ I6 r+ F6 }* T$ p+ ? re.Global = True( t/ {" X. X2 E! M8 \+ O8 W4 ?- R# R
re.Pattern = ":em(.[^\[]*):"; B0 [; k: |6 N2 q9 A5 p5 \6 N
regular = re.Replace(str, "")
3 M" `+ J# z) p6 y* k9 _ End Function0 E( b0 r8 G0 ~. K$ g
? regular(":em26:")! G* R9 H% O$ P" M4 I2 \. R: S
返回 |