' Check whether a string ends with one of multiple possible choices.' Return -1 if no possible string matches the end of the source,' otherwise return the index of the matching string.'' Examples:' Debug.WriteLine(EndsWith("This is my test line", True, "Line",' "String")) ' => -1' Debug.WriteLine(EndsWith("This is my test line", True, "string",' "line")) ' => 1' Debug.WriteLine(EndsWith("This is my test line", False, "Line",' "String")) ' => 0' Debug.WriteLine(EndsWith("This is my test line", False, "string",' "sentence")) ' => -1Function EndsWith(ByVal source As String, ByVal caseSensitive As Boolean, _ ByVal ParamArray parts() As String) As Integer Dim i As Integer For i = 0 To parts.Length - 1 Dim part As String = parts(i) If caseSensitive Then If source.EndsWith(part) Then Return i Else If source.ToLower().EndsWith(part.ToLower()) Then Return i End If Next ' if we get here, the source does not end with one of the possible choices, ' so return -1 Return -1End Function


The Role of Call Data: How Call Tracking Can Improve Customer Experience
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