只要窗体不关闭,控件的值就不会丢失。所以,你可以使窗体模式显示:
frmEdit.show 1
这样,你只需要在窗体的QueryUnload()事件中检查保存标志:
if Not Saved then
if msgbox("你还没有保存。需要保存吗",vbyesno + vbquestion)=vbyes then
'执行保存
......
end if
end if
frmEdit.show 1
这样,你只需要在窗体的QueryUnload()事件中检查保存标志:
if Not Saved then
if msgbox("你还没有保存。需要保存吗",vbyesno + vbquestion)=vbyes then
'执行保存
......
end if
end if
然后在鼠标事件中判断,如果控件集合中哪一个的tag属性是1就提示保存它
用WH_CALLWNDPROC
监测自身进程内的消息