regex - VBA 正则表达式 - 抢时间 HH :MM from String

Question

给定一个任意字符串，我想从该字符串中获取一个小时(HH:MM)。

这是我的正则表达式:

^                   # Start of string
(?:                 # Try to match...
 (?:                #  Try to match...
  ([01]?\d|2[0-3]): #   HH:
 )?                 #  (optionally).
 ([0-5]?\d):        #  MM: (required)
)?                  # (entire group optional, so either HH:MM:, MM: or nothing)
$                   # End of string

我的代码:

Public Sub RegexTest()

 Dim oRegex As Object
 Dim time_match As Object

 Set oRegex = CreateObject("vbscript.regexp")
 With oRegex
  .Global = True
 .Pattern = "^(?:(?:([01]?\d|2[0-3]):)?([0-5]?\d):)$" 'HH:MM
 End With


 Dim s As String: s = "START TIME: Mar. 3rd 2016 12:00am"

 Set time_match = oRegex.Execute(s)
 If time_match.Count = 1 Then
   Debug.Print time_match.Matches(0)
 Else

 End If


End Sub

但是我无法在这里匹配并且没有得到输出。

Answer 1

您的 ^(?:(?:([01]?\d|2[0-3]):)?([0-5]?\d):)$ 模式仅匹配以可选 HH: 部分开头的完整字符串，以及强制 MM 部分，后跟强制 : 部分。

我建议

(?:[01]?\d|2[0-3]):[0-5]\d

因为您正在匹配字符串的部分。

参见regex demo