devxlogo

CountOccurrences – Counting the number of string occurrences

CountOccurrences – Counting the number of string occurrences

' Count the number of string occurrencesPublic Function CountOccurrences(ByVal source As String, ByVal search As String, _    Optional ByVal ignoreCase As Boolean = False) As Integer    Dim options As System.Text.RegularExpressions.RegexOptions    ' set the search options according to the ignoreCase parameter    If ignoreCase Then        options = System.Text.RegularExpressions.RegexOptions.IgnoreCase    Else        options = System.Text.RegularExpressions.RegexOptions.None    End If    ' count the occurrences    Dim mc As System.Text.RegularExpressions.MatchCollection = _        System.Text.RegularExpressions.Regex.Matches(source, search, options)    Return mc.CountEnd Function' Count the number of string occurrencesPublic Function CountOccurrences(ByVal source As String, _    ByVal startIndex As Integer, ByVal search As String, _    Optional ByVal ignoreCase As Boolean = False) As Integer    Return CountOccurrences(source.Substring(startIndex), search, ignoreCase)End Function

See also  How to Create and Deploy QR Codes Online: A Comprehensive Guide
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist