Я хочу реализовать многоуровневое наследование в моем приложении Vb.Net.
У меня есть базовая форма с именем Base_Level0, которая содержит некоторые методы, свойства и т. Д.
Теперь еще одна форма с именем Base_Level1, которая наследует Base_Level0.
Эти 2 формы являются базовыми.
Теперь моя фактическая форма с именем Form1 наследует Base_Level1.
Эта форма Form1 содержит событие Load формы, которое не вызывается.
Но если Form1 наследует Base_Level0 напрямую, запускается событие загрузки.
Тогда почему доза события загрузки не срабатывает с многоуровневым наследованием.
Эти 3 списка являются пользовательскими элементами управления.
***Base List Level0
Public Class frmNewBaseList_Level0
'
'
Private Sub frmNewBaseList_Level0_Load(sender As Object, e As System.EventArgs) Handles Me.Load
End Sub
'
'
End Class
***Base List Level1
Public Class frmNewBaseList_Level1
Inherits frmNewBaseList_Level0
'
'
Private Sub frmNewBaseList_Level1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
End Sub
'
'
End Class
***Actual List
Public Class frmCustomersList
Inherits frmNewBaseList_Level1
'
'
Private Sub frmCustomersList_Load(sender As Object, e As System.EventArgs) Handles Me.Load
End Sub
'
'
End Class
The code from where i add these list to my main form is given below:
Public Sub setMDIChild(ByVal sMDIChild As UserControl, ByVal sMDIParent As Form)
sMDIChild.Parent = sMDIParent
sMDIChild.Dock = DockStyle.Fill
sMDIChild.Show()
sMDIChild.BringToFront()
EnableSearch = True
End Sub
вызов frmCustomersList в форме MDI выглядит следующим образом:
If (ofrmCustomer Is Nothing) Then
ofrmCustomer = New frmCustomersList
End If
setMDIChild(ofrmCustomer, Me)