>Dear Experts,
>
>I have 20 textboxes on form.
>only one textbox has data, all other 19 textbox are empty.
>
>Textbox name are text1---text20.
>
>How to findout which textbox is not empty?
>
>Pleaes help

If they are named Text1...Text20, then:

LOCAL lnFor, loTextBox
lnFor = 0
loTextBox = NULL
FOR lnFor =  1 TO 20
    WITH EVALUATE([thisform.Text]+TRANSFORM(lnFor))
         IF NOT EMPTY(.Value)
            loTextBox = EVALUATE([thisform.Text]+TRANSFORM(lnFor))
            EXIT
         ENDIF
    ENDWITH
NEXT
IF NOT ISNULL(loTextBox)
   WAIT WINDOW loTextBox.Name
ENDIF