VBS正則表達式對象的MultiLine屬性

來源：本站原創(chuàng)|時間：2020-01-10|欄目：vb|點擊：次

在 Introduction to Regular Expressions（正則表達式簡介）一章中的 Backreferences（向后引用）一節(jié)：

復制代碼代碼如下:

 
'使用上面所示的正則表達式，下面的 JScript 代碼可以使用子匹配信息，在一個文字字符串中將連續(xù)出現兩次的相同單詞替換為一個相同的單詞： 
var ss = "Is is the cost of of gasoline going up up?.\n"; 
var re = /\b([a-z]+) \1\b/gim; //創(chuàng)建正則表達式樣式。 
var rv = ss.replace(re,"$1"); //用一個單詞替代兩個單詞。最接近的等價 VBScript 代碼如下： 

Dim ss, re, rv 
ss = "Is is the cost of of gasoline going up up?." & vbNewLine 
Set re = New RegExp 
re.Pattern = "\b([a-z]+) \1\b" 
re.Global = True 
re.IgnoreCase = True 
re.MultiLine = True 
rv = re.Replace(ss,"$1")請注意在 VBScript 代碼中，全局、大小寫敏感性以及多行標記都是使用 RegExp 對象的適當屬性來設置的。 

需要注意的是 VBScript 中多行標記和 Perl 兼容的正則表達式中的多行標記并不完全一樣：

如果 multiline 為 false，那么 "^" 匹配字符串的開始位置，而 "$" 匹配字符串的結束位置。如果 multline 為 true，那么 "^" 匹配字符串開始位置以及 "\n" 或 "\r" 之后的位置，而 "$" 匹配字符串結束位置以及 "\n" 或 "\r" 之前的位置。

而在 Perl 中，如果設置了多行標記，"^" 匹配字符串開始位置以及 "\n" 之后的位置，而 "$" 匹配字符串結束位置以及 "\n" 之前的位置。也就是 Perl 兼容的正則表達式并不匹配 "\r"，這跟 Linux 系統中文本的換行符與 Windows 系統中不一樣有關。Linux 系統中文本的換行符為 "\n"，而 Windows 系統中為 "\r\n"，這就導致了正則表達式的不同。

VBS 正則表達式 MultiLine 屬性的這個特性可能會導致某些問題，所以在用 VBS 正則表達式處理文本時我一般會先把 "\r\n" 替換成 "\n"：

復制代碼代碼如下:

 
Dim fso, str 
Set fso = CreateObject("scripting.filesystemobject") 
str = fso.OpenTextFile("demon.txt") 
str = Replace(str, vbCrLf, vbLf) 

原文: http://demon.tw/programming/vbs-regexp-multiline.html

上一篇：bookfind 通過ISBN序號獲取圖書連接的書名與作者的vbs代碼

欄目：vb

下一篇：網絡接口利用率監(jiān)控VBS腳本代碼（Windows）

本文標題：VBS正則表達式對象的MultiLine屬性

本文地址：http://www.jygsgssxh.com/a1/vb/7404.html

更多vb

雷火电竞-中国电竞赛事及体育赛事平台

vb

VBS正則表達式對象的MultiLine屬性

您可能感興趣的文章

閱讀排行

本欄相關

隨機閱讀