One way:

CREATE CLASS FormValues AS Relation
Param1 = ""
Param2 = ""
...
ReturnValue1 = ""
ReturnValue2 = ""
...
ENDCLASS

...
loFormValues = NEWOBJECT ("FormValues")
loFormValues.Param1 = Param1
loFormValues.Param2 = Param2
...
loForm = CREATEOBJECT ("MyFormClass", loFormValue)
loForm.Show (1)
lcReturnValue1 = loFormValue.ReturnValue1
lcReturnValue2 = loFormValue.ReturnValue2
...
loForm.Release ()
loForm = NULL

You set the return values in the object FormValues from your form. Don't do a Release in your form, hide it instead.

HTH

>I know this one returns value from UNLOAD form event...
>DO FORM MyModalForm WITH param1, param2 TO returnvalue
>
>But how to return a value with this one... ?
>oForm = CreateObject("MyFormClass", param1, param2)
>oForm.Show(1)
>RELEASE oForm