Mi rispondo da solo, anche per poter aiutare chi ha lo stesso problema:

Private Sub form1_Closing(ByVal sender As Object, _
ByVal e As System.ComponentModel.CancelEventArgs) _
Handles MyBase.Closing

MiaRoutine

End Sub

Grazie comunque per le risposte.