Excellent - thanks for posting the solution!
I was going to suggest using a MessageBox to make sure we knew exactly what the variable was set to, because a MessageBox seemed clearer than using Send. In case it helps for future debugging, here's a way to message box your variables.
crt.Dialog.MessageBox("\"" + strPrompt + "\"")