2013-05-28 3 views
0

정규식을 사용하여 문자열의 반복 패턴을 찾으려고합니다. 나는 테스터 내 정규식을 테스트하고 나는 그것이 내 정규식에 아무 문제 없다고 생각하지만 내 코드는 첫 경기 (0.0000000000000000)을 반환하고 다른 일치하지 :첫 번째 일치에만 일치하는 정규 표현식

Dim searchstr As String 
Dim regexp As Object 
Dim colregmatch As MatchCollection 

searchstr = "ST/X 0.0000000000000000 6.4000000000000004 12.8000000000000010 19.1999999999999990 25.6000000000000010 32.0000000000000000" 
Set regexp = CreateObject("vbscript.regexp") 
With regexp 
     .Pattern = "([0-9]+\.[0-9]+)\s*" 
     .IgnoreCase = True 
     .Global = True 
     .MultiLine = True 
     .Global = False 
End With 
Set colregmatch = regexp.Execute(searchstr) 
If colregmatch.Count <> 0 Then 
     For Each Match In colregmatch 
      MsgBox Match 
     Next Match 
End If 

:

여기

내 코드입니다 이 문제를 해결하도록 도와 주시겠습니까?
고마워요

답변

2

전역 플래그를 처음으로 설정 한 다음 거짓으로 설정했습니다.

.Global = True 
    .MultiLine = True 
    .Global = False 

마지막 것을 제거하십시오.

관련 문제