国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 編程 > VBScript > 正文

VBS教程:對(duì)象-Matches 集合

2020-07-26 12:09:42
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

Matches 集合

正則表達(dá)式 Match 對(duì)象的集合。

說(shuō)明

Matches 集合中包含若干獨(dú)立的 Match 對(duì)象,只能使用 RegExp 對(duì)象的 Execute 方法來(lái)創(chuàng)建之。與獨(dú)立的 Match 對(duì)象屬性相同,Matches `集合的一個(gè)屬性是只讀的。

在執(zhí)行正則表達(dá)式時(shí),可能產(chǎn)生零個(gè)或多個(gè) Match 對(duì)象。每個(gè) Match 對(duì)象都提供了與正則表達(dá)式匹配的字符串的訪(fǎng)問(wèn)入口、字符串的長(zhǎng)度,以及標(biāo)識(shí)匹配位置的索引。

下面的代碼將說(shuō)明如何使用正則表達(dá)式查找獲得 Matches 集合,以及如何循環(huán)遍歷集合:

Function RegExpTest(patrn, strng)  Dim regEx, Match, Matches      ' 創(chuàng)建變量。  Set regEx = New RegExp         ' 創(chuàng)建正則表達(dá)式。  regEx.Pattern = patrn         ' 設(shè)置模式。  regEx.IgnoreCase = True         ' 設(shè)置是否區(qū)分大小寫(xiě)。  regEx.Global = True         ' 設(shè)置全程匹配。  Set Matches = regEx.Execute(strng)   ' 執(zhí)行搜索。  For Each Match in Matches      ' 循環(huán)遍歷Matches集合。    RetStr = RetStr & "Match found at position "    RetStr = RetStr & Match.FirstIndex & ". Match Value is '"    RetStr = RetStr & Match.Value & "'." & vbCRLF  Next  RegExpTest = RetStrEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))
發(fā)表評(píng)論 共有條評(píng)論
用戶(hù)名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 镇雄县| 玉树县| 平利县| 孝义市| 巩义市| 望都县| 东宁县| 收藏| 荥阳市| 电白县| 磐安县| 江西省| 绥德县| 盐山县| 临泽县| 北安市| 搜索| 铜梁县| 商南县| 任丘市| 铅山县| 梓潼县| 巴林左旗| 蒙城县| 夹江县| 罗源县| 古丈县| 吉安市| 东阳市| 涟水县| 临海市| 旅游| 灵山县| 东乡| 和田市| 缙云县| 连州市| 石家庄市| 广德县| 西乡县| 嘉黎县|