Hi Mohammed,

You're welcome.
For lnMonth work, it has one public variable. Other way will be you create one property in your form and you use thisForm.myProp instead lnMonth.


>Hi Mr Erick,Mr tore.
>thank you both very much, it works,
>but i get error message lnMonth not found,

>if nkeycode=13
>   SET FILTER TO
>   LOCATE FOR  dat=thisform.text2.Value
>   IF FOUND()
>  * SET FILTER TO MONTH(dat)=MONTH(thisform.text2.Value) &&  via this it works no problem.
>      lnMonth=MONTH(thisform.text2.Value)&& not works
>      SET FILTER TO MONTH(dat)=lnMonth && not works
>      thisform.grid1.Visible=.t.
>      thisform.grid1.Refresh
>      thisform.grid1.column7.setfocus()
>   else
>      =messagebox("åÐÇ ÇáÊÇÑíÎ ÛíÑ ãæÌæÏ ")
>      thisform.grid1.visible=.f.
>   ENDIF
>endif

>