要想在VFP表单关闭有一个提示，比如有数据没有更新之类的，在form的unload事件中加上了NODEFAULT，但点击表单右上角的关闭按钮一样关闭了表单。

试试这样能否满足要求
在QUERYUNLOAD事件
NODEFAULT

form的unload事件里加入一下代码：
nchoice=MESSAGEBOX("Are you sure?",4+32+256,"Remind!")
IF nchoice =7 &&选择否
    NODEFAULT
ENDIF

[此贴子已经被作者于2021-11-6 09:49编辑过]