Chaim

try a this.setfocus after the messagebox

Agnes

>Hi all
>I have textbox (name txtgettype) with the following code in 'interactivechange'.
>

txtgettype.interactivechange code:
>local ctype,cright
>cright=thisform.txthideright.value
>ctype=alltrim(this.value)
>do case
>	case len(ctype)<>4
>		return
>	case int(val(ctype))<>int(val(cright))&&Here the problem
>		*	This.Value=''
>		messagebox('Wrong typing, Try Again Please!',0+16)
>		return
>	case ctype==crigh
>		*do...
>endcase
>

The problem is that I vfp lose the textbox focus in the SECOND case.
>Help please (remember that I dont lose the focus in the first case only in the second).