Così:
If MsgBox("bla bla bla", vbOKCancel, "Elimina") = vbOK Then
'Ok
Else
'Cancel
End If