国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 会昌县| 通山县| 洛川县| 玉树县| 绥中县| 泗洪县| 新蔡县| 湘阴县| 西贡区| 循化| 蒙山县| 迁西县| 竹北市| 灵武市| 华蓥市| 无为县| 长宁区| 铜川市| 孟连| 茶陵县| 鹤岗市| 新乡市| 屯昌县| 虹口区| 土默特左旗| 郴州市| 布尔津县| 鄄城县| 嘉禾县| 乌拉特后旗| 高安市| 无为县| 旺苍县| 周口市| 宁都县| 汶川县| 汝州市| 稻城县| 新兴县| 灵宝市| 外汇|