Eu tenho uma Class Mãe a qual eu tenho Propriedades Métodos e Eventos.
Eu tenho uma Class Filha que de implementa a Class Mae. Esta Class Filha Dispara ou acionar o Evento da mãe, não estou conseguindo fazer isto solicito uma ajuda.

Fonte em VB.NET 2003.

-------------------------------------

Public Class UserControl_Mae
  Inherits System.Windows.Forms.UserControl

#Region " Windows Form Designer generated code "
'...
#End Region

  Public lo_Prop_Text As String = ""
  Public Event Event_Critica_Class_Mae(ByVal Sender As Object, ByVal e As EventArgs)
  Public Event Event_Set_Prop_Text(ByVal Value As String)

  Public Property Prop_Text() As String
    Get
      Prop_Text = lo_Prop_Text
    End Get
    Set(ByVal Value As String)
      lo_Prop_Text = Value
      RaiseEvent Event_Set_Prop_Text(Value)
    End Set
  End Property

End Class

-------------------------------------

Public Class UserControl_TextBox
  Inherits UserControl_Mae

#Region " Windows Form Designer generated code "
'...
#End Region

  'Não quero declarar este evento nas Clases Filhas quero que ele Fique na
  'Class Mae e as Class Filhas só disparem o Evento
  Public Event Event_Critica_Class_TextBox(ByVal Sender As Object, ByVal e As EventArgs)

  Private Sub txtbxLista_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtbxLista.LostFocus

    '??????
    'Quero Disparar este Evento da Class Mae
    'RaiseEvent Event_Critica_Class_Mae(Me, Nothing) 'Msg=> "Darived Class Cannot raise base Class Events"

    'Este o evento declarado aki Funciona
    RaiseEvent Event_Critica_Class_TextBox(Me, Nothing)

  End Sub

  Private Sub txtbxLista_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtbxLista.TextChanged
    Prop_Text = txtbxLista.Text
  End Sub

  Private Sub UserControl_TextBox_Event_Set_Prop_Text(ByVal Value As String) Handles MyBase.Event_Set_Prop_Text
    txtbxLista.Text = Value
  End Sub
End Class

-------------------------------------

ublic Class Form1
    Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "
'...
#End Region

  Private Sub UserControl_TextBox1_Event_Critica_Class_Mae(ByVal Sender As Object, ByVal e As System.EventArgs) Handles UserControl_TextBox1.Event_Critica_Class_Mae
    MsgBox("Quero que seja disparado este Evento" & Chr(13) & "UserControl_TextBox1_Event_Critica_Class_Mae")
  End Sub

  Private Sub UserControl_TextBox1_Event_Critica_Class_TextBox(ByVal Sender As Object, ByVal e As System.EventArgs) Handles UserControl_TextBox1.Event_Critica_Class_TextBox
    'Este eu consigo
    MsgBox("UserControl_TextBox1_Event_Critica_Class_TextBox")
  End Sub

End Class

-------------------------------------

public class UnidadeMedidaDesktop : UnidadeMedida
public string CodUnidadeMedida
{
 get{return  base.CodUnidadeMedida;}
 set{ base.CodUnidadeMedida = value;}
}

Não entendi o seu posti Martini.

Vc poderia explicar ?

Encontrei a solução para este problema com o meu prof.

É o seguinte, temos que criar um Public Sub na class Mae que envoque o Evento. E na class filhe chamamos esta sub.

-----------------------------------