Issue with multipage form page changes

I suspect this may be a long post...apologies in advance.

I have a multipage form with 12 tabs (index 0-11) designed for use by users to enter data for a model. That was fine, but then they asked for the ability to have it also edit previous entries, and I'm having a weird issue with one of the event handlers that I use to read in old data.

The issue starts on this tab, which is index 3

ROIpage.JPG

If the YES radio button under Common Repairable is selected, the event handler takes them over to another tab

CommonalityPage.JPG

(which is index 9) to enter some additional data, and then come back. This works fine for new data entry, but the issue comes in when they're editing a previous entry. Here's how it should work...

This is the event handler for whenever there is a page change:

Please Login or Register  to view this content.

The important block of code is

Please Login or Register  to view this content.

So if we're on page 3, and we're in the edit mode, the code should
-- make tab index 9 visible
-- switch to tab index 9
-- make all the other tabs invisible

But here's a screen shot from when I stepped through that code in the debugger

ErrorROIPage.JPG

You'll note that the tab title is "Commonality" which is the title of tab index 9, but the contents of the tab are still index 3.

What's even more bizarre is that if I click the next button in the lower right, whose handler just says multipage1.value = multipage1.value + 1, then I'm suddenly taken to the correct tab 9. What's going on?

Okay...the whole workbook is attached. I'm quite certain this isn't the only error in it though, as it's still a work in progress. I'm sure it's also a mess of spaghetti to more experienced developers.

That said, to duplicate the issue, select "Edit existing alternative" from the main menu, then press the "Tactical Entries" button, select "test_it_all" from the list box and press the "Edit Selected Alternative" button. Using the "next" buttons move on to the page titled "ROI". The page change event handler should at this point take you to page titled "Commonality" to edit those entries...this is the problem I described in OP.

Update:

I tried forcing the issue by explicitly setting focus to one of the text boxes on the tab (index 9) that is not appearing. So the event handler now includes

Please Login or Register  to view this content.

where txtSytem is a textbox on page index 9. I get a runtime error that says

Can't move focus to the control because it is invisible, not enabled, or of a type that does not accept the focus

Don't know where to go at this point. I've explicitly made the tab visible, and I know a textbox can accept focus....

This is the first time I've worked with the multipage control, so I'm not familiar with fmTabStyleNone, I'll look into that.

I've used this approach throughout the form...hiding tabs when they're not in use and making them visible when they are...and it works everywhere but here.

I also tried your suggestion of calling .Repaint just before I try .SetFocus and I still get the same error.

I've now tried the following in an attempt to force the update

Multipage1.pages(9).visible=true
Multipage1.pages(9).enabled=true
Multipage1.value=9
txtSystem.setfocus

And I still get the runtime error on the setfocus...

EnableEvents is a public boolean...the page change event handler checks it first thing and if it's false then it bails.

Also, based on some things I'd read in other forum threads, I tried adding DoEvents in there prior to setting focus...no change.

And I've now tried part of the solution from this post by creating a public sub in a module to handle the change of the multipage1.value and that didn't work either. Haven't tried doing it with OnTime yet....this is getting ridiculous.

I appreciate your help. I'm gathering this has something to do with trying to change the multipage value inside the pagechange event handler. I take your point about changing the .style to no tabs and that may be what I have to do...but this is on the order of 3,000 lines long and was supposed to have been finished last week this is the only issue right now (as far as I know) standing between me and being done with this and moving on to something more fun. I'd hate to have to make significant changes to the design at this stage.

I think I can make that work....just more rework than I was hoping to have to do

It seems to be working now, but still some odd behavior.

I changed the style to no tabs and got rid of all the fiddling with .visible. I still had to use the application.ontime approach to change the page within the pagechange event handler though. And, and this is the really weird part, I still can't setfocus to a text box on the page after switching to it. I get the same runtime error that says

Can't move focus to the control because it is invisible, not enabled, or of a type that does not accept the focus

But if I take out the setfocus line, everything works just fine. And since the textbox I was trying to setfocus to is the first one on the page, the cursor is sitting there anyway...

Thanks for your help!