Private Sub ChangeControlsState(ByVal bState As Boolean)
Try
Dim ctr As Control
For Each ctr In tabClient.Controls
If TypeOf ctr Is TextBox Then
ctr.Enabled = bState
End If
Next
For Each ctr In tabLoan.Controls
If TypeOf ctr Is TextBox Or TypeOf ctr Is ComboBox Or TypeOf ctr Is NumericUpDown Then
ctr.Enabled = bState
End If
Next
btnApply.Enabled = bState
Catch 'ignore errors
End Try
End Sub
' Remove a tabpage named TabPage2 from the
' tab control TabControl1
TabControl1.Controls.Remove(TabPage2)
'Here's putting it back
TabControl1.Controls.Add(TabPage2)
PhilBayley said:Howdy partner!
I thought you were being clever with you new dot net code. Now I know where you get your ideas.