Mohammed,

Where You run this code?

>hi all,
>
>i'll try with this code under,but if the answer is rong
>it must setfocus to thisform.pageframe1.page1.text3.value,but i can't see where is the cursour at myform.
>

>DO CASE
>   CASE NOT BETWEEN(thisform.pageframe1.page15.text3.value,1,2)
>           =MESSAGEBOX("rong choises")
>              thisform.Pageframe1.ActivePage = 15
>              thisform.pageframe1.page15.text3.SetFocus  &&&
>
>   OTHERWISE
>           thisform.Pageframe1.ActivePage = 14
>            thisform.Pageframe1.Page14.Text1.SetFocus()
>ENDCASE
>

>
>thanks.
>m.qasem