' If INCLUDE is True or is omitted, return the first occurrence of a character ' in a group' or -1 if SOURCE doesn't contain any character among those listed in TABLE.' If INCLUDE is False, return the first occurrence of the character in SOURCE' that does not appear in TABLE.'' string indices are zero-based' TABLE can be in the form "A-Z"Function InstrTbl(ByVal Start As Integer, ByVal Source As String, _ ByVal Table As String, Optional ByVal Include As Boolean = True, _ Optional ByVal CaseInsensitive As Boolean = False) As Integer ' create the regular expression Dim pattern As String If Include Then pattern = "[" & Table & "]" Else pattern = "[^" & Table & "]" End If ' prepare the correct regex option Dim options As Text.RegularExpressions.RegexOptions If CaseInsensitive Then options = Text.RegularExpressions.RegexOptions.IgnoreCase End If ' create the Regex object Dim re As New Text.RegularExpressions.Regex(pattern, options) ' find the match Dim ma As Text.RegularExpressions.Match = re.Match(Source, Start) ' return the found index, or -1 If ma.Success Then Return ma.Index Else Return -1 End IfEnd Function
The Role of Call Data: How Call Tracking Can Improve Customer Experience
June 9, 2023
Who would argue that experiences reign supreme? But not just any experiences — the ones that occur when customers interact with your business. It’s these real-life interactions that have the
