Private Sub Salva(ByVal sender As Object, ByVal e As System.EventArgs) Handles ButtonSalva.Click, MenuSalva.Click 'Salva il record End Sub