Flere hændelser på samme knap

Kan man have flere hændelser på samme knap ? hvordan gør man det. Nedenstående er en testhændelse, men hvordan fortsætter man på samme knap.

Private Sub cmdtest_Click()
On Error GoTo Err_cmdtest_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "musik"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdtest_Click:
    Exit Sub

Err_cmdtest_Click:
    MsgBox Err.Description
    Resume Exit_cmdtest_Click
   
End Sub

Skal fortsætte her eller ?? skal jo udføres når jeg klikker på knappen.