VB6 introduced the Split function, which returns a zero-based, one-dimensional array containing a specified number of substrings. Although this function is useful in itself, you can also use it in other useful ways. For example, by combining the UBound and Split functions, you can count how many times a substring?or single character?appears inside another string:
Function InstrCount(Source As String, _ SearchString As String) As Long If Len(Source) Then InstrCount = UBound(Split(Source, SearchString)) End IfEnd Function
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
