After a while, all the double and triple quotes get boring. Here is what I do...
Dim stQuest as String
Dim stTitle as String
Dim inAnsw as Integer
stTitle = "{" & Me.Customer & "} is not in the list"
stQuest = "Add new customer? "
inAnsw = MsgBox( stQuest, vbYesNo, stTitle )
...
Think SIMPLE.