~Function RegExpTest(patrn, strng)  Dim regEx, Match, Matches         ' 建立變量。  Set regEx = New RegExp         ' 建立正則表達(dá)式。  regEx.Pattern = patrn         ' 設(shè)置模式。  regEx.IgnoreCase = True         ' 設(shè)置是否區(qū)分大小寫。  regEx.Global = True            ' 設(shè)置全局可用性。  Set Matches = regEx.Execute(strng)      ' 執(zhí)行搜索。  For Each Match in Matches         ' 遍歷 Matches 集合。    RetStr = RetStr & "匹配 " & I & " 位于 "    RetStr = RetStr & Match.FirstIndex & ". Match Value is "'    RetStr = RetStr & Match.Value & "'." & vbCRLF  Next  RegExpTest = RetStrEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))

VB
BS
S教
教程
程V
VB
Bs
sc
cr
ri
ip
pt
t屬
屬性
性F
Fi
ir
rs
st
tI
In
nd
de
ex
x屬
屬性
性

相關(guān)文章

VBS教程：正則表達(dá)式簡(jiǎn)介 -建立正則表達(dá)式
VBS教程：正則表達(dá)式簡(jiǎn)介 -建立正則表達(dá)式...
2006-11-11
通過(guò)vbs修改以點(diǎn)結(jié)尾的文件的屬性為隱藏
這篇文章主要介紹了通過(guò)vbs修改以點(diǎn)結(jié)尾的文件的屬性為隱藏,需要的朋友可以參考下
2016-12-12
用VBS精確計(jì)算100的階乘的實(shí)現(xiàn)代碼
運(yùn)行一下上面的程序，輸出2.43290200817664E+18。笑而不語(yǔ)，再次證明了我之前的結(jié)論，在這種網(wǎng)站上回答問(wèn)題的，大部分水平都不咋地。
2011-04-04
VBS類構(gòu)造函數(shù)與Default關(guān)鍵字使用介紹
很多人并不知道 VBS 中還有個(gè) Default 關(guān)鍵字，更不用說(shuō)知道 Default 關(guān)鍵字的用法。
2011-10-10
運(yùn)行同一目錄下的可執(zhí)行程序的VBS代碼
運(yùn)行同一目錄下的可執(zhí)行程序的VBS代碼，需要的朋友可以參考下。
2011-01-01
VBS教程：方法-DriveExists 方法
VBS教程：方法-DriveExists 方法...
2006-11-11
用vbs實(shí)現(xiàn)的強(qiáng)制殺進(jìn)程的腳本
用vbscript實(shí)現(xiàn)的強(qiáng)制殺系統(tǒng)進(jìn)程的腳本代碼，主要用于一些殺毒軟件，占系統(tǒng)內(nèi)存或cpu，我們可以用下面的方法殺掉，黑人也必須殺掉殺毒軟件，才能進(jìn)行下一步操作，不建議搞破壞。
2008-05-05
FileSystemObject 示例代碼
FileSystemObject 示例代碼...
2007-01-01
通過(guò)vbs修改目錄名稱與快捷方式名稱的實(shí)現(xiàn)代碼
這篇文章主要是分享了如果用vbs修改目錄名與快捷方式名稱的代碼，需要的朋友可以參考下
2013-07-07
VBS合并一個(gè)文件夾里的TXT的實(shí)現(xiàn)代碼
有時(shí)從網(wǎng)上的電子書網(wǎng)站上下載解壓后。得到的是多個(gè)TXT文本。有沒(méi)有辦法把多個(gè)TXT合在一起看呢？寫了個(gè)代碼。不是很完美，歡迎高手批評(píng)指教。我只是個(gè)菜鳥(niǎo)，需要大家的關(guān)懷才能進(jìn)步哇
2013-01-01