Question

Dim str as String
str = "30 40 50 60"

I want to count the number of substrings.

Expected Output: 4

(because there are 4 total values: 30, 40, 50, 60)

How can I accomplish this in VB6?

Answer 1

You could try this:

arrStr = Split(str, " ")
strCnt = UBound(arrStr) + 1
msgBox strCnt

Of course, if you’ve got Option Explicit set (which you should..) then declare the variables above first..