this code won't end the program, it just sends me back to my form, i want it to end the program, what am i doing wrong....

Private Sub cmdcancel_Click()
Dim intresponse As Integer
MsgBox "Are you sure you want to quit the program?", vbYesNo, "You Actually Want to Quit?"
If intresponse = vbYes Then
End
End If
End Sub