Use a msgbox

if msgbox("Click OK to continue, or Cancel to abort",vbOKCancel,"You Decide") = vbCancel then
    msgbox "Cancel"
Else
   msgbox "Ok"
Endif