>>>lcNewString = "" >>>For lnX = 1 to lnLen >>> lcNewString = lcNewString + Upper(Left(laString(lnX),1)) + substr(laString(lnX),2) + crlf >>>ndfor >>>>>
>>lcNewString='' >>lnLen = alines(laString,lcString) >>#define crlf chr(13)+chr(10) >>For lnX = 1 to lnLen >> lcNewString = lcNewString + Upper(Left(laString(lnX),1)) + substr(laString(lnX),2) + crlf >>Endfor >>lcNewString = left(lcNewString, len(lcNewString-2))>>
>>>>>>>>>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))>>>>>>>>
>>>>>lcNewString='' >>>>>lnLen = alines(laString,lcString) >>>>>#define crlf chr(13)+chr(10) >>>>>For lnX = 1 to lnLen >>>>> lcNewString =Upper(Left(laString(lnX),1)) + substr(laString(lnX),2) + crlf >>>>>Endfor >>>>>lcNewString = left(lcNewString, len(lcNewString-2))