Private Sub kinderForm_Load(...)
        AddHandler Me.ParentForm.Click,AddressOf MamaForm_Klick
    End Sub
    Sub MamaForm_Klick(ByVal sender As Object, ByVal e As System.EventArgs)
        MsgBox("Click")
    End Sub