s = "Happy new year↑”
flag=False:m=0
For i=1 To Len(s)
c= Mid(s,i,1)
If c >=“a" And c <= "z” Then
If Not flag Then
m=m+1
flag=True
End If
Else
flag = False
Next i