Tab Control Event

[Paul H]

I have a tab control and I am trying to get it to return a certain value each time a tab it clicked.



I have put a simple piece of code in the tab click event which doesn't run at all.

Private Sub Verify_Click()

    X = 0
    MsgBox x

End Sub

Really I'd just like to grab the index number of the tab, but I'll be satisfied if I can get this to work. I haven't worked a lot with tab controls so maybe I a missing something obvious.

Please enlighten me.

Paul

[RuralGuy]

Use the Change Event of the Tab Control. The Click Event is practically useless.

[Paul H]

I should have clarified, I meant the Click Event for the Page, i.e. Click on Verify x = 0 (or page index if I can get it), Click on CO, X = 1, etc. If I can get that through the On Change of the tab control, that would be fine too, but I can't seem to track that value down.

[RuralGuy]

You can retrieve the page index from the Change Event. I may not understand your issue.

[Paul H]

Far simpler than I was making it. This did the trick. I just didn't know how to capture the index of the active page.

X = Me.TabReportType.Value

    Select Case X
    
        Case 0
            MsgBox "Verify"
        Case 1
            MsgBox "Central Office"
        Case 2
            MsgBox "History"
        Case 3
            MsgBox "Current"
        Case 4
            MsgBox "Tickler"
        Case 5
            MsgBox "Research"
        Case 6
            MsgBox "Privileges"
        Case Else
            MsgBox "Nothing"
            
    End Select

Thanks for helping