I have an exe which generates some word reports. I want to terminate the execution of this exe when i click a cancel button. I am not able to get it working

I have used this sub routine to stop execution

Sub KillPrint()
Set wrd = Nothing
MsgBox "Print Cancelled!"
End
End Sub


I am not able to set the focus on the cancel button when the printing of the data in the word document is started..
I am using the code

frmPrint.setfocus for the same

I need help:
1. To get focus on the Cancel button
2. To get it to kill the execution of the program