>&&&range form 1 to 9 >IF THISFORM.TEXT4.Value=9 and THISFORM.TEXT5.Value>"" > THISFORM.command1.visible=.T. > ELSE > THISFORM.command1.visible=.F. > =MESSAGEBOX("íÌÈ ÇÏÎÇá ÇáÑÓÇáÉ") && this message > thisform.text5.setfocus > > IF THISFORM.TEXT4.Value>0 and THISFORM.TEXT4.Value<9 > THISFORM.command1.visible=.t. > ELSE > =MESSAGEBOX("íÌÈ ÇÏÎÇá ÇáÇÌÇÈÉ") > THISFORM.command1.visible=.f. > ENDIF > > > endif >>thanks