다른 문자열 에 나타 나 는 문자열 의 횟수 함 수 를 계산 합 니 다.

318 단어 문자열횟수
Function strnum(patrn, strng)   Dim regEx, Match, Matches,xx     xx=0   Set regEx = New RegExp   regEx.Pattern = patrn   regEx.IgnoreCase = True            ' 대소 문자 구분 여 부 를 설정 합 니 다.  regEx.Global = True   Set Matches = regEx.Execute(strng)   For Each Match in Matches     xx=xx+1   Next   strnum = xx End Function

좋은 웹페이지 즐겨찾기