IF BETWEEN(thisform.pageframe1.page16.text1.value,1,2) =MESSAGEBOX("ÇÎÊíÇÑ ÎÇØÆ") thisform.Pageframe1.ActivePage = 16 thisform.pageframe1.page16.text1.SetFocus else if thisform.pageframe1.page16.text1.value=2 =MESSAGEBOX("ÓíÊã ÇáÇäÊÞÇá Çáì ÓÄÇá ÑÞã 10") thisform.Pageframe1.ActivePage = 10 thisform.Pageframe1.Page10.Text1.SetFocus() else thisform.Pageframe1.ActivePage = 15 thisform.Pageframe1.Page15.Text1.SetFocus() endif endifthanks.