lostfocus event: if text box height exceeds n points, call sub

The idea is to make text box lostfocus event that calls sub "newpage01" when the textbox "TB01" is closed, "newpage02" when sub "TB02" is closed, etcetera. The Newpage subs add rows to accomodate the height of the textboxes. Here's what I have:

Please Login or Register  to view this content.

once the sub actually works, I also need to know how to use it as a lostfocus event.

Any Ideas?

Thanks,

Willardio