-
本版专家分：412结帖率 100% -
在程序运行中，如何在关闭窗体右上角关闭按钮（即X）时给出提示（如：是否已保存，确定退出？）而不是直接关闭？
在菜单中可以写代码退出系统，而这个关闭不知在哪里设置，在窗体的属性中一直找不到地方进行设置。请高手指点。
-
本版专家分：139072
-
- 进士 2010年 总版技术专家分年内排行榜第五
-
-
银牌
2010年11月 总版技术专家分月排行榜第二
2010年9月 总版技术专家分月排行榜第二
2010年8月 总版技术专家分月排行榜第二
-
- 铜牌 2010年7月 总版技术专家分月排行榜第三
-
-
微软MVP
2012年1月 荣获微软MVP称号
2011年1月 荣获微软MVP称号
-
-
Form_Closing事件中，判断后，如果阻止，可以写e.Handle = true即可
-
本版专家分：139072
-
- 进士 2010年 总版技术专家分年内排行榜第五
-
-
银牌
2010年11月 总版技术专家分月排行榜第二
2010年9月 总版技术专家分月排行榜第二
2010年8月 总版技术专家分月排行榜第二
-
- 铜牌 2010年7月 总版技术专家分月排行榜第三
-
-
微软MVP
2012年1月 荣获微软MVP称号
2011年1月 荣获微软MVP称号
-
-
Form_Closing事件中，判断后，如果阻止，可以写e.Handle = true即可
-
本版专家分：412
-
提示e.Handle = true中Handle不是FormClosingEventArgs的成员。
用e.Cancel = True可以阻止退出。最后代码为：
Private Sub Rebound_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MessageBox.Show("工程数据是否已保存，是否退出？", "真的退出吗？", MessageBoxButtons.OKCancel,
MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then
Me.Close()
Else
Exit Sub
End If
End Sub
谢谢！选择的事件正确。
-
本版专家分：412
-
不好意思，调试后，发觉会陷入死循环，一直在Me.Close()这句上运行。而奇怪的是，没加入这个事件之前，在菜单退出中同样的代码，却能正常运行，即选OK就关闭退出，选Cancel就退出过程（不退出程序），这是为什么？请高手继续指教。
-
本版专家分：412
-
调试后，代码调整如下：
Private Sub Rebound_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MessageBox.Show("工程数据是否已保存，是否退出？", "真的退出吗？", MessageBoxButtons.OKCancel,
MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then
Exit Sub
Else
e.Cancel = True
End If
End Sub
这段代码正常，满足要求（OK退出，Cancel不退出软件）。
Private Sub 退出XToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出XToolStripMenuItem1.Click
If MessageBox.Show("工程数据是否已保存，是否退出？", "真的退出吗？", MessageBoxButtons.OKCancel,
MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then
Me.Close()
Else
Exit Sub
End If
End Sub
这段代码，按OK需确定两次才退出，按Cancel则退出过程不退出软件。
有何改进办法？请指教。
-
本版专家分：1779 -
FormClosing
-
本版专家分：412
-
上面的代码中第二段按OK应该是运行自身，第二次弹出对话框实际应该是运行第一段代码，按OK退出软件。经过调整，代码如下：
Private Sub Rebound_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MessageBox.Show("工程数据是否已保存，是否退出？", "真的退出吗？", MessageBoxButtons.OKCancel,
MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then
Exit Sub
Else
e.Cancel = True
End If
End Sub
Private Sub 退出XToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出XToolStripMenuItem1.Click
Me.Close()
End Sub
上面第二段代码，调用第一段的代码（直接调用过程不行，如Rebound_FormClosing(sender,e)，因为e类型不一致而出错。）现在这种情况，可以达到效果。只是不明白，第一段代码中，为何Exit Sub应是退出过程，怎么会是退出程序？
-
本版专家分：92567
-
- 进士 2012年 总版技术专家分年内排行榜第十
-
- 金牌 2012年3月 总版技术专家分月排行榜第一
-
- 微软MVP 2013年7月 荣获微软MVP称号
-
-
红花
2017年1月 .NET技术大版内专家分月排行榜第一
2016年11月 .NET技术大版内专家分月排行榜第一
2012年3月 .NET技术大版内专家分月排行榜第一
-
-
不就这么点代码。在FormClosing，不过是C#的
if (MessageBox.Show("您确认要退出吗？", "退出系统", MessageBoxButtons.OKCancel) == DialogResult.OK)
{
this.Dispose();
Application.Exit();
}
else
e.Cancel = true;
-
本版专家分：412
-
把Exit Sub改成Me.Dispose()可以达到同样效果，不过Me.Dispose()含义清楚。Application.Exit（）似乎多余，没有Me.Dispose()有Application.Exit()时，不知为何要确定两次，是否自动+1次重载？
-
本版专家分：412
-
而确定后面都不加代码（else后面保留），按确定也会退出，即没有Exit Sub、Me.Dispose()或Application.Exit()，都会退出程序，它们有什么区别，是否都释放了内存？
- ExtAspNet_v2.3.2_dll
-一个典型应用，在Window控件中打开新页面，如果传递的参数不正确，则首先提示参数不对然后关闭此弹出窗口。 -ExtAspNet.Alert.Show("参数错误！", String.Empty, ExtAspNet.ActiveWindow.GetCloseReference());...
- ExtAspNet v2.2.1 （2009-4-1） 值得一看
-一个典型应用，在Window控件中打开新页面，如果传递的参数不正确，则首先提示参数不对然后关闭此弹出窗口。 -ExtAspNet.Alert.Show("参数错误！", String.Empty, ExtAspNet.ActiveWindow.GetCloseReference());...
- 申请单管理系统
如果已经填写，则判断输入的部门名称在部门表中是否已经存在，如果存在，则不能新增，并给出提示“该部门名称已经存在！”；如果不存在，则新增部门。如果新增成功，则弹出提示“新建成功！”，并关闭该模态窗口，...
- delphi 开发经验技巧宝典源码
0233 在窗体关闭时提示有未保存的数据 155 0234 设置只允许3次密码错误 156 0235 如何读取Word中的文本 156 0236 通过身份证号获取年龄 157 0237 如何实现一个应用程序只能打开一个进程 158 7.4 其他数据...
- 专家门诊 Visual C++开发答疑300问 pdf书(含全部代码)
如何使窗体右上角的系统按钮无效 如何改变窗口的图标 屏幕保护程序的原理是什么 应该如何制作屏幕保护程序 如何在Visual C++ 6.0中用回车键切换输入焦点 如何实现类似QQ程序的界面 如何一步一步地弹出和关闭窗口 ...
- Excel两表校对,附件中有使用说明书和样表和帮助
g) 关闭程序，点击“退出”按钮或点击窗体右上角红Ｘ关闭程序。 五星正式版更新内容： 1.增加列号限制1位字符。 V5更新内容： 1. 自动识别标题“子项物料”“物料编码”，表头或表中如果有这样的行自动屏蔽。...
- JAVA上百实例源码以及开源项目源代码
5个目标文件 内容索引:Java源码,窗体界面,3DMenu Java 3DMenu 界面源码，有人说用到游戏中不错，其实平时我信编写Java应用程序时候也能用到吧，不一定非要局限于游戏吧，RES、SRC资源都有，都在压缩包内。...
- 方便快捷的选择题考试系统
在一个窗口中按tab键,移动聚焦的顺序不能杂乱无章,tab 的顺序是先从上至下，再从左至右。一屏中首先应输入的和重要信息的控件在tab顺序中应当靠前,位置也应放在窗口上较醒目的位置。 布局力求简洁、有序、易于操作...
- vb学生成绩管理系统
要编写一个实用的数据库程序，必须系统地学习过数据库原理的知识，并首先设计出符合用户业务需求的数据库体系，然后才能利用某种语言，开发出针对这个数据库的交互程序：数据库应用程序。 2. 程序的主要功能 ...
- VB编程资源大全
scroller.zip 当窗体内的控件摆不下时，这个控件的源代码能帮您用滚动的方法解决(6KB) 43,activeresizerocx.zip 窗体内的控件大小随窗体的变化而变化(OCX文件) (12KB) 44,activeresizerdll.zip ...
- 韵脚大全 v6.6.rar
01、操作提示信息窗弹出2秒后将自动关闭 02、主窗体控件统一下移9位，使整体布局更显紧凑 03、窗体《资源共享》平台完善各项快捷操作 04、窗体《软件设置》添加总在最前选项 05、窗体《友情链接》添加新浪...
- JAVA上百实例源码以及开源项目
像坐标控制、旋转矩阵、定时器、生成图像、数据初始化、矩阵乘法、坐标旋转、判断是否是顺时针方向排列、鼠标按下、放开时的动作等，都可在本源码中得以体现。 Java编写的显示器显示模式检测程序 2个目标文件 内容...
- Qt Creator 的安装和hello world 程序+其他程序的编写--不是一般的好
15.我们在右下角的属性栏里将字体大小由9 改为15。 16.我们拖动标签一角的蓝点，将全部文字显示出来。 17.再次按下运行按钮，便会出现helloworld。 到这里helloworld 程序便完成了。 Qt Creator 编译的程序，在其...
- 易语言程序免安装版下载
修改BUG：矢量动画支持库中的“矢量编辑框”组件在光标位于组件右下角时按右光标键进入下一行会导致显示错误。 10. 修改BUG：矢量动画支持库中的“矢量编辑框”组件在光标位于组件左上角时按左光标键进入前一行...
- C# for CSDN 乱七八糟的看不懂
本文由abc2253130贡献 doc文档可能在WAP端浏览体验不佳。建议您优先选择TXT，或下载源文件到本机查看。 C#（WINFORM）学习 一、 C#基础 基础 类型和变量 类型和变量 类型 C# 支持两种类型：“值类型”和“引用类型...
- c# 加密和解密相关代码
（2）更改默认窗体Form1 的Name 属性为Frm_Main，在该窗体中添加两个GroupBox 容器控件，其中， 在第一个GroupBox 中放入3 个TextBox 控件和一个Button 按钮，分别用于输入数字、输入加密数字、显示加 密后的数字和...
- javascript函数的解释
87.当窗体关闭时调用的文件句柄:onunload() 88.window.location的属性: protocol(http:),hostname(www.example.com),port(80),host(www.example.com:80),pathname("/a/a.html"),hash("#giantGizmo",指跳转到相应的锚...
- C#开发实战1200例(第2卷.完整版)(清华出版.王小科.王军).part2
实例005 获得鼠标在窗体上的位置 实例006 记录鼠标行为 实例007 通过截取系统消息判断鼠标的单击键 1.2 鼠标基本设置 实例008 定义鼠标指针形状 实例009 自定义鼠标的图片 实例010 自定义动画鼠标 实例011 交换鼠标...
- ApkIDE——安卓反编译
注：如果使用自己的keystore，请在设置窗口点“验证”按钮确保能显示为“验证成功”的方能使用，否则如果配置不正确编译成的apk是没有签名的（即apk中没有META-INF文件夹），且这个过程中不会有错误提示造成无法排查...
- Absorption and Scattering of Light by Small Particles
MIE散射理论最权威的解释