For Next statement
why is it when i use this:
Function cvText(cllText As String)
For i = 1 To Len(cllText)
cvText = Mid(cllText, i, 1)
Next
End Function
....
and test it..
Print cvText("hello")
o
I get "o"
but if I use
Function cvText(cllText As String)
For i = 1 To Len(cllText)
cvText = Right(clltext,i)
Next
End Function
i get:
Print cvText("hello")
hello
i get "hello"
i want to be able to loop through each character
using mid(clltext,i,1) to test if there is a blank.
the goal is to create a function that ucase's the
beginning of each letter of a word
thanks.
|