dim bClose as Boolean
Form'un QueryUnload event'ine ekle:
If bClose = false then cancel = true
__________________