no sé exactamente que pretendas porque al asociar un evento debe contener la misma firma y sea válido
te paso un ejemplo sencillo con un botón
Código:
Dim btnSample As New Button
btnSample.Name = "btnSample"
btnSample.Text = "Sample"
'...
'...
AddHandler btnSample.Click, AddressOf btnSampleClick
....
....
Private Sub btnSampleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
'aqui va tu code
End Sub
te recomiendo que las más respecto al
manejo de eventos
Salu2