VB.NET中退出确认的实现
来源:互联网 发布:网络信息发布制度 编辑:程序博客网 时间:2024/06/03 22:57
1、
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MessageBox.Show("确定退出吗?", "退出确认", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.No Then
e.Cancel = True
End If
End Sub
2、
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MsgBox("确定退出吗?", MessageBoxButtons.OKCancel, "退出确认") = Windows.Forms.DialogResult.Cancel Then
e.Cancel = True
End If
End Sub
3、
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim p As Integer
p = MsgBox("你真的要退出游戏吗?", MsgBoxStyle.OkCancel, "游戏提示")
If p = 2 Then
e.Cancel = True
End If
End Sub
4、最简单的代码:
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MsgBox("你确认要退出程序吗?", MsgBoxStyle.OkCancel, "退出提示") = MsgBoxResult.Cancel Then e.Cancel = True
End Sub
以上只是点击窗口关闭按钮时的用法,若直接在窗体控件上点击退出时,可以用以下方式实现:
Public Sub checkExit()
If (MessageBox.Show("您确定要退出系统吗?", "确认", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.OK) Then
Me.Close()
Application.Exit()
End If
End Sub
- VB.NET中退出确认的实现
- VB.Net中确认退出对话框的实现
- android中的退出确认框的实现
- Android实现“退出确认”对话框
- 仿微信界面的 确认退出对话框的实现
- [VB.NET]vb中很容易实现的打印机设置窗口,在vb.net中如何实现?烦恼中!
- [VB.NET]VB.NET中如何实现QQ消息的效果?
- 用VB.NET确认一个ISBN值
- 在VB.NET中实现文件的拖放
- 在VB.NET中实现文件的拖放
- 在VB.NET中实现文件的拖放
- VB.NET中实现控件数组的方法
- VB.NET中实现不同窗体间控件的访问
- 在VB.NET中实现文件的拖放
- VB.NET中实现控件数组的功能
- VB.Net 中实现延迟的几种方法分析
- Extjs 中确认对话框的实现 示例
- Extjs 中确认对话框的实现 示例
- .NET 4.0网络开发入门之旅-- 我在“网” 中央(下)
- C#串口监听的实现实例操作
- 基于Xlib(X库)的开发
- VS2005打包图解
- JDBC 插入时, 取得插入的主键的返回值
- VB.NET中退出确认的实现
- 帮HR招到好员工
- C# 记事本查找替换 新手 请高人多多指教
- Mapxtreme Java 地图缩放,平移操作的原理和实现
- 为什么我的积分是82分,可下载的时候只显示只有2分?谁告诉我是怎么回事啊?
- 初学者如何开发出高质量J2EE系统
- C/C++——字符串和字符数组
- PHP程序员的参考书籍
- 查看和修改系统最大文件描述符