Thank Tore
I tested it with two lines below stored into a variable, using messagebox()

aaaaaaaaaaaaaaaaaaaaaaaaaa

bbbbbbbbbbbbbbbbbbbbbbbbbbb

>>lcNewString=''
>>#define crlf chr(13)+chr(10)
>>For lnX = 1 to memlines(lcString)
>> lcNewString =Upper(Left(mline(lcString,lnX),1)) + substr(mline(lcString,lnX),2) + crlf


= messagebox (lcNewString )

** results

Aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

====== blank line========

Bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

=======blank line===========


*But it does not join the lines.
*I din't understand how it join lines to new variable.
*Please help me.


>>Endfor
>>lcNewString = left(lcNewString, len(lcNewString)-2)





>Correction:

>lcNewString = left(lcNewString, len(lcNewString)-2)

>
>>Thank you Tore
>>I am testing it.
>>
>>But the line below results mismatch message
>>
>>>lcNewString = left(lcNewString, len(lcNewString-2))
>>
>>I believe it has to do with left or len funcion.
>>As it is outsite FOR I did understand how it works and I am not able to fix it.
>>
>>
>>Moises
>>
>>
>>
>>
>>
>>>Something like this (not tested)

>>>lcNewString=''
>>>#define crlf chr(13)+chr(10)
>>>For lnX = 1 to memlines(lcString)
>>>   lcNewString =Upper(Left(mline(lcString,lnX),1)) + substr(mline(lcString,lnX),2)  + crlf
>>>Endfor
>>>lcNewString = left(lcNewString, len(lcNewString-2))

>>>
>>>>Hi
>>>>
>>>>I stored a text into a variable and need to treat it in order to turn capital the first letter of every line.
>>>>
>>>>eg:
>>>>
>>>>acccccacacacacaccacca
>>>>
>>>>dddjjdjjdjjdjjdjjd
>>>>
>>>>xxxxx ddddddd aaaaaaa
>>>>
>>>>annannannannanan
>>>>
>>>>
>>>>Must become:
>>>>
>>>>Acccccacacacacaccacca
>>>>
>>>>Dddjjdjjdjjdjjdjjd
>>>>
>>>>Xxxxx ddddddd aaaaaaa
>>>>
>>>>Annannannannanan