Hello,
I have one main view and don’t know what you mean by the overriden.
The tabpages:
Me.TabControl1 = New TabControl
Me.pHoofd = New TabPage
Me.pInvoer = New TabPage
Me.TabControl1.TabPages.Add(Me.pHoofd)
Me.TabControl1.TabPages.Add(Me.pInvoer)
Me.MainPanel.Controls.Add(Me.TabControl1)
The dispose sub:
If Not IsDisposed Then
If disposing Then
'rapid data
If Not RD Is Nothing Then
RD.Dispose()
RD = Nothing
End If
If Not RDpt Is Nothing Then
RDpt.Dispose()
RDpt = Nothing
End If
If Not RDeob Is Nothing Then
RDeob.Dispose()
RDeob = Nothing
End If
If Not RDstatus Is Nothing Then
RDstatus.Dispose()
RDstatus = Nothing
End If
'hoofd
If Not RDCurStat Is Nothing Then
RDstatus.Dispose()
RDstatus = Nothing
End If
If Not bEnd1 Is Nothing Then
bEnd1.Dispose()
bEnd1 = Nothing
End If
'buttons
If Not bEnd2 Is Nothing Then
bEnd2.Dispose()
bEnd2 = Nothing
End If
'invoer
If Not bLoad1 Is Nothing Then
bLoad1.Dispose()
bLoad1 = Nothing
End If
If Not bLoad2 Is Nothing Then
bLoad2.Dispose()
bLoad2 = Nothing
End If
If Not bStationsInv Is Nothing Then
bStationsInv.Dispose()
bStationsInv = Nothing
End If
If Not bStationsHo Is Nothing Then
bStationsHo.Dispose()
bStationsHo = Nothing
End If
If Not numPad1 Is Nothing Then
numPad1.Dispose()
numPad1 = Nothing
End If
'tabpages
If Not pHoofd Is Nothing Then
pHoofd.Dispose()
pHoofd = Nothing
End If
If Not pInvoer Is Nothing Then
pInvoer.Dispose()
pInvoer = Nothing
End If
If Not TabControl1 Is Nothing Then
TabControl1.Dispose()
TabControl1 = Nothing
End If
If Not TheRC Is Nothing Then
TheRC.Dispose()
TheRC = Nothing
End If
If Not MainPanel Is Nothing Then
MainPanel.Dispose()
MainPanel = Nothing
End If
End If
MyBase.Dispose(disposing)
End If
Hope this makes it clearer