[讨论]对程序窗口右上角的关闭按钮如何控制? - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → [讨论]对程序窗口右上角的关闭按钮如何控制?

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2638 人关注过本帖

标题：[讨论]对程序窗口右上角的关闭按钮如何控制?

取消只看楼主加入收藏

qwaszwc

等　级：新手上路
帖　子：74
专家分：0
注　册：2007-9-29

楼主

问题点数：0 回复次数：3

[讨论]对程序窗口右上角的关闭按钮如何控制?

我的一个打印程序,用户可能会单击右上角的关闭按钮或左上角的控制菜单框的关闭(即Alt+F4)来关闭程序,
可问题是该程序仍然在内存运行中,按Ctrl+Alt+Del,调出任务管理器即可看到.
非得通过"退出"按钮"的
Unload form
命令才能完全退出.
该如何解决.

搜索更多相关主题的帖子: 按钮　右上角　窗口　

2007-10-04 14:48

qwaszwc

等　级：新手上路
帖　子：74
专家分：0
注　册：2007-9-29

第 2 楼

得分:0

如何让窗体的Controlbox属性设为False,则没有最大化和最小化按钮.也不方便.
不知他们怎么做的?

2007-10-04 14:51

qwaszwc

等　级：新手上路
帖　子：74
专家分：0
注　册：2007-9-29

第 3 楼

得分:0

太麻烦了吧.况且我也不会做.

2007-10-04 20:38

qwaszwc

等　级：新手上路
帖　子：74
专家分：0
注　册：2007-9-29

第 4 楼

得分:0

以下是引用lrd1986在2007-10-4 21:01:47的发言：
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If MsgBox("真的退出吗?", vbQuestion + vbYesNo) = vbYes Then
Cancel = False
Else
Cancel = True
End If
End Sub

我引用了上面的代码,可窗口还是没有关闭.又在中间加入了下面的代码:
Dim intctr As Integer
For intctr = (Forms.Count - 1) To 0 Step -1
Unload Forms(intctr)
Next intctr
卸载全部窗口.
问题解决.

2007-10-04 23:04

快速回复：[讨论]对程序窗口右上角的关闭按钮如何控制?