VB
This function determines how many occurances of a character are in a string.
Code:
Public Function checkString()
Dim strChar As String
Dim Char As String
strChar = "Johnny Boy"
Char = Split(strChar, "y")
return UBound(Char)
'returns 2
End Function