GotoPage

[yont11]

I am having trouble getting the GoToPage command to work. I have a single form with 3 tab controls. In an on exit event I want the focus to go from one tab control to another. I have used the code:

Forms!Switchboard.GotoPage 2

to move to the tab control I want but I keep getting the error:
Run-time error '2163'
The page number you used as an argument for the GotoPage action or method doesn't exist in this form.

Can anyone help? Thanks.

 

[PHV]

Do you have 3 TabControl or a TabControl with 3 tabs ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[yont11]

PHV it is a Tabcontrol with 3 tabs.

 

[PHV]

So, you may try something like this:
Me![TabControl name].Value = 1 ' GoTo Page 2

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[yont11]

PHV tried what you said with the following:

Me![Tabctl0].Value = 1 'Goto Page 2

it gave me a message Can't find the field 'Tabctl0' referred to in your expression.

 

[PHV]

And this ?
Forms!Switchboard!Tabctl0.Value = 1

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[TheAceMan1]

How are ya yont11 . . .

There's no [blue]focus events[/blue] for a tab control. You may have to add two buttons for left/right movement . . .

See Ya! . . . . . .

Be sure to see FAQ219-2884:

 

[yont11]

Thanks PHV & TheAceMan1 for your help. I'll keep working on it. Cheers.

 

[missinglinq]

If you have a control on your tabbed page that can receive focus, such as a textbox, simply place this code in the OnExit event you were speaking of:

YourTextBoxName.SetFocus


The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[yont11]

Hi missingling,

Says it can't find the field. The field is sitting on another page. Thanks.

 

[missinglinq]

Says it can't find the field. The field is sitting on another page."

Sorry, but that makes no sense! If you set the focus to a control on the tabbed page the code will work! Did you try to set the focus to a field on a subform maybe? You have to reference controls on subforms differently.

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[missinglinq]

Here's a cheat for the problem that I just gave someone yesterday. It work!

In Design View click on Page2 then place a textbox on it; name the control DummyTextBox. Place it in the left lower corner of your tabbed page. Now shrink it down the the absolute smallest size you can.

Then in the OnExit event of the last textbox on Page1:

Private Sub LastTextBoxOnPage1_Exit(Cancel As Integer)
  Me.[b]DummyTextBox[/b].SetFocus
End Sub

Good Luck!

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[yont11]

Thanks Missinglinq I will give it a try.

Cheers.