| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1231 人关注过本帖
标题:[求助]怎么能不让窗体右上角的X使用!
只看楼主 加入收藏
酒干倘卖无
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2005-5-1
收藏
得分:0 
★ 在一个窗体卸载关闭时,我们知道会发生Unload事件,事实上,在Unload事件发生前,另一个重要事件会发生,即Form_QueryUnload事件,在此事件中,为用户提供停止卸载继续工作的机会,如下:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

End Sub
其中有两个参数:cancel:若设此参数为True,可阻止unload事件发生。
unloadmode:返回引起窗体卸载关闭的原因:0为使用标题栏"关闭"("关闭"纽或标题栏的系统菜单栏),1为代码中用unload me语句,2为Windows环境会话结束;3为Windows任务管理器关闭程序;4为MDI子窗体关闭。
在窗体的存在周期中,发生的窗体事件依次为:
Form_initialize->Form_Load->form_Resize->form_Activate->Form_GotFocus
->Form_Paint->Form_QueryUnload->Form_Unload->Form_Terminate.
★ 我们经常用unload me来关闭一个窗体,但此命令并不能将一个窗体从内存中完全清除,要想完全移走窗体,应将窗体设置为nothing,即在form_unload事件中写:
set form1=nothing

2005-05-18 23:55
huwenjie
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2005-3-10
收藏
得分:0 
在unload事件里面把cancel的值设定成非0的任意值就可以了
2005-05-26 10:44
快速回复:[求助]怎么能不让窗体右上角的X使用!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018997 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved