Visual Basic.NET - No consigo hacer funcionar los eventos en un proyecto vacío de visual basic.

Hola, estoy haciendo un programa en visual basic 2022. Y no sé como hacer que se ejecute el contenido del evento. ¿Podeis ayudarme por favor?




Option Compare Text

Option Explicit On

Option Infer On

Option Strict On

Imports System.Windows.Forms.Form

Module Claseprincipal

Public Class ClaseSegunda

Public Event Click()

Sub CauseTheEvent_Click()

RaiseEvent Click()

End Class

End Sub

Dim FORM_principal As New Form

FORM_principal.Visible = True

FORM_principal.Top = 20

FORM_principal.Left = 200

FORM_principal.Height = 200

FORM_principal.Width = 200

Sub main()

Dim Clase_Principal_Click As New ClaseSegunda

AddHandler Clase_Principal_Click.Click, AddressOf FORM_principal_Click

Clase_Principal_Click.CausaElEventoClick()

RemoveHandler Clase_Principal_Click.Click, AddressOf FORM_principal_Click

Clase_Principal_Click.CausaElEventoClick()

End Sub

Private Sub FORM_principal_Load()

messagebox.show("FUNCIONA")

End Sub

End Module