>>You can also try ALINES(). It may be even easier and faster.
>>
>>lnStart = Thisform.Edit1.SelStart
>>lcCrLf = CHR(13) + CHR(10)
>>
>>lnOccurence = OCCURS(lcCrLf, LEFT(Thisform.Edit1.Text, lnStart))
>>
>>ALINES(laLines, Thisform.Edit1.Text)
>>lcCommand = laLines[lnOccurence + 1]
>>
>>
>
>One time - it's a typo.
>
>Two times - it's a typo.
>
>Three times - it's an ignorance.
Well... 45.294.838.848 times - it is a mind of an (almost) old guy that don't follow his fingers velocity anymore <g>
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20