Asp regular expression match number $

Copy codeThe Code is as follows:
Dim strOk, strNo
StrOk = "12312321 $12312312312 $12312321 $"
StrNo = "12312321 $12312312312 $12312321 $ sdfsd"

Function RegExpTest (patrn, strng)
Dim regEx, match, matches 'to create a variable.
Set regEx = New RegExp 'to create a regular expression.
RegEx. Pattern = patrn 'setting mode.
RegEx. IgnoreCase = true' specifies whether to distinguish uppercase and lowercase letters.
RegEx. Global = false' sets the full nature.
Set matches = regEx. Execute (strng) 'to Execute the search.
For each match in matches
RetStr = RetStr & "Match found at position"
RetStr = RetStr & Match. FirstIndex & ". Match Value is '"
RetStr = RetStr & Match. Value & "'." & vbCRLF
Next
IF Not IsEmpty (matches) And matches (0). Value = strng Then
RegExpTest = true
Else
RegExpTest = false
End IF
End Function
MsgBox (RegExpTest ("[\ d + \ $] +", strOk ))