在Access中正确使用表达式

会计考友

在Access中正确使用表达式
+ K) g; h/ ]! ]3 K" A5 q, {) |8 L通过引用 Microdoft VBScript Regular Expressions 5.5 或者 Microdoft VBScript Regular Expressions 1.0, 则可以使用 VBScript 的正则表达式, 实现字符串匹配和替换。
　　大家都知道, 正则表表达式源于 UNIX 系统, 用来处理字符串配匹, 通常用事提取关键字, 对其进行处理. 例如, 本论坛的 UBB 标记处理, 就是通过正则表达式来完成的.
/ Q5 p( b; o$ [2 ]$ w3 y　　例如
  Z" p( _0 l9 N4 y4 K　　Public Function regular(str)
　　Dim re As New RegExp
) k% r# {7 p. t% g; x　　re.IgnoreCase = True
　　re.Global = True
; A9 S6 v1 M* \; s　　re.Pattern = ":em(.[^\[]*):"
　　regular = re.Replace(str, "")
　　End Function
- \& g* r& k# F; ~　　? regular(":em26:")
. }# H/ C! [  O5 H  ~9 Y　　返回