I see a problem with your Else line. Looks like it should be an ElseIf and the "then" is inside your quotes.

If you want to use the switch function, then use it. If not, there's nothing wrong with if-then-else if. I still use it all the time. I only revert to a switch statement when it's something very simple, like one-line items. If you've got blocks of code that need to go there, if-then-else is fine.

Here's the proper If/Then:

Details

If uType = "developer" Then
    Me.MMTabCtrl.Pages(0).Visible = True
    Me.MMTabCtrl.Pages(1).Visible = True
    Me.MMTabCtrl.Pages(2).Visible = True
    Me.MMTabCtrl.Pages(3).Visible = True
ElseIf uType = "management" Then
    Me.MMTabCtrl.Pages(0).Visible = True
    Me.MMTabCtrl.Pages(1).Visible = True
    Me.MMTabCtrl.Pages(2).Visible = True
    Me.MMTabCtrl.Pages(3).Visible = False
ElseIf uType = "Data Entry" Then
    Me.MMTabCtrl.Pages(0).Visible = True
    Me.MMTabCtrl.Pages(1).Visible = True
    Me.MMTabCtrl.Pages(2).Visible = False
    Me.MMTabCtrl.Pages(3).Visible = False
End If
Copy

And here's the same logic using a Select Case (what most people call a switch):

Details

Select Case uType
    Case "developer"
        Me.MMTabCtrl.Pages(0).Visible = True
        Me.MMTabCtrl.Pages(1).Visible = True
        Me.MMTabCtrl.Pages(2).Visible = True
        Me.MMTabCtrl.Pages(3).Visible = True
    Case "management"
        Me.MMTabCtrl.Pages(0).Visible = True
        Me.MMTabCtrl.Pages(1).Visible = True
        Me.MMTabCtrl.Pages(2).Visible = True
        Me.MMTabCtrl.Pages(3).Visible = False
    Case "Data Entry"
        Me.MMTabCtrl.Pages(0).Visible = True
        Me.MMTabCtrl.Pages(1).Visible = True
        Me.MMTabCtrl.Pages(2).Visible = False
        Me.MMTabCtrl.Pages(3).Visible = False
End Select
Copy

Where I find that select case statements come in handy is when it's one item per line, something like this...

Details

Select Case n
    Case 1: x = 5
    Case 2: x = 6
    Case 3: x = 10
    Case 4: x = 20
    Case Else: x = 0
End Select
Copy

And this would be the same thing with an if-then-else block...

Details

If n = 1 Then
    x = 5
ElseIf n = 2 Then
    x = 6
ElseIf n = 3 Then
    x = 10
ElseIf n = 4 Then
    x = 20
Else
    x = 0
End If
Copy

Functionally, it's the exact same thing, but it's just cleaner to read. It's completely up to you. Access doesn't care. VBA does not care which one you use.

Make sure you watch Select Case

Another option is Select Case.

Richard You beat me to it. LOL.

Richard Thanks bunches as my kids used to say when they was little. LOL I did not notice my type. That was what I intended. That's what happens when you type code in Notepad and don't make sure Access likes it.

Thank you

Kevin I looked at that and decided to go with what I knew. I'll check here for a video on select case. NVM there is a link to it right in your comment! And Richard's. Man I am getting old.

Thanks again

Chuck ain't we all. :)