如何爲caputure只匹配部分匹配的字符串？非捕獲組

Question

下面我有一個示例測試用例，我只想抓住星期六值，如果單詞Blah出現在它之前。下面是我得到的，但由於某種原因，我最終得到了「Blah」。任何幫助都會很棒。謝謝！

Sub regex_practice() 
Dim pstring As String 

pstring = "foo" & vbCrLf & "Blah" & vbCrLf & vbCrLf & "Saturday" 
'MsgBox pstring 

Dim regex As Object 
Set regex = CreateObject("VBScript.RegExp") 

With regex 
    .Pattern = "(?:Blah)((.|\n)*)Saturday" 
    .Global = True 'If False, would replace only first 
End With 


Set matches = regex.Execute(pstring) 

Answer 1

當然。整個比賽中包含一個非捕捉組。你可能在尋找的是在這裏抓住合適的捕獲組。
變化

With regex 
    .Pattern = "(?:Blah)((.|\n)*)Saturday" 
    .Global = True 'If False, would replace only first 
End With 

要

With regex 
    .Pattern = "Blah[\s\S]*?(Saturday)" 
    .Global = True 'If False, would replace only first 
End With 

然後使用.SubMatches：

If regex.test(pstring) Then 
    Set matches = regEx.Execute(pstring) 
    GetSaturday = matches(0).SubMatches(0) 
End If 

此外((.|\n)*)是相當糟糕，而使用例如[\s\S]*?。