How to enable or disable tab pages on form

[mrbboy]

I have a form with 5 tab pages. The form, frm_Review, has a text box named txt_Status. How do I enable or disable the tab pages based on whether or not txt_Status is OPEN or CLOSE.

 

[missinglinq]

Private Sub txt_Status_AfterUpdate()
If Me.txt_Status = "open" Then
 Me.YourTabControl.Enabled = True
Else
 Me.YourTabControl.Enabled = False
End If
End Sub

Private Sub Form_Current()
If Me.txt_Status = "open" Then
 Me.YourTabControl.Enabled = True
Else
 Me.YourTabControl.Enabled = False
End If
End Sub

The Missinglinq

Richmond, Virginia

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