devxlogo

SearchString – Searching a string in case [in]sensitive mode

SearchString – Searching a string in case [in]sensitive mode

' Search the specified string, with the case-sensitive mode or not' Returns the index of the first occurrence found, or -1 if not foundPublic Function SearchString(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 m As System.Text.RegularExpressions.Match = _        System.Text.RegularExpressions.Regex.Match(source, search, options)    If m.Success Then        Return m.Index    Else        Return -1    End IfEnd Function' Search the specified string, starting at the specified index,'  with the case-sensitive mode or not' Returns the index of the first occurrence found, or -1 if not foundPublic Function SearchString(ByVal source As String, _    ByVal startIndex As Integer, ByVal search As String, _    Optional ByVal ignoreCase As Boolean = False) As Integer    Dim options As System.Text.RegularExpressions.RegexOptions    Dim i As Integer = SearchString(source.Substring(startIndex), search, _        ignoreCase)    If i = -1 Then        Return -1    Else        Return i + startIndex    End IfEnd Function

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