Dim strMsg As VbMsgBoxResult
strMsg = MsgBox("Really quit?", vbYesNo)
If strMsg = vbNo Then
Cancel = True
Else
Unload Me
End If
"A myth is not the succession of individual images,
but an integerated meaningful entity,
reflecting a distinct aspect of the real world."
___ Adolf Jensen
Reply With Quote