>I believe this should work, and to a degree it does:
>
>All prequisites are in order, and in debug mode it performs exactly as intended. In real life it tends to skip a page most of the time.
>
>
>CASE nKeyCode = 148
> TRY
> .Pages1.ACTIVEPAGE = .Pages1.ACTIVEPAGE + 1
> CATCH
> .Pages1.ACTIVEPAGE = 1
>ENDTRY
>
Add a nodefault.
Cetin