-
C#教程之C#实现延时并自动关闭MessageBox的方法
我们在C#编程中常见的信息提示框(MessageBox)是微软NET自带的一个用于弹出警告、错误或者讯息一类的“模式”对话框。此类对话框一旦开启,则后台窗体无法再被激活(除非当前的MessageBox被点击或者关闭取消)。那么如何使用程序模拟鼠标点击这个messageBox(关闭这个MessageBox)令其延时并自动关闭呢?答案是你在弹出这个messageBox之前先启用一个定时器,定时器内部不断向窗体发送Enter按钮用于模拟点击MsgBox的内容,同时主程序中弹出模式消息框。
具体实现代码如下(本程序运行测试环境基于VS2012 RC 编写):
我们假设窗体上就只有一个Button,点击这个Button将弹出5个msgbox,同时每个msgbox将延时2秒后自动关闭。
C#功能代码如下:
public partial class Form1 : Form { private System.Windows.Forms.Timer[] ts = new System.Windows.Forms.Timer[6]; public Form1() { InitializeComponent(); } void t_Tick(object sender, EventArgs e) { ((System.Windows.Forms.Timer)sender).Enabled = false; SendKeys.SendWait("{Enter}"); } private void button1_Click(object sender, EventArgs e) { Action act = new Action(() => { for (int i = 0; i < 6; i++) { ts[i] = new System.Windows.Forms.Timer(); ts[i].Tick += t_Tick; ts[i].Interval = 2000; ts[i].Enabled = true; MessageBox.Show("MsgBox" + (i + 1)); Thread.Sleep(2000); } }); act.BeginInvoke(null, null); } } Public Partial Class Form1 Inherits Form Private ts As System.Windows.Forms.Timer() = New System.Windows.Forms.Timer(5) {} Public Sub New() InitializeComponent() End Sub Private Sub t_Tick(sender As Object, e As EventArgs) DirectCast(sender, System.Windows.Forms.Timer).Enabled = False SendKeys.SendWait("{Enter}") End Sub Private Sub button1_Click(sender As Object, e As EventArgs) Dim act As New Action(Sub() For i As Integer = 0 To 5 ts(i) = New System.Windows.Forms.Timer() AddHandler ts(i).Tick, AddressOf t_Tick ts(i).Interval = 2000 ts(i).Enabled = True MessageBox.Show("MsgBox" & (i + 1)) Thread.Sleep(2000) Next End sub) act.BeginInvoke(Nothing, Nothing) End Sub End Class
此外需要注意:
1.这里使用了“委托异步”是为了防止主线程被Thread延时导致假死的情况发生。
2.SendKeys这里必须使用SendWait,否则会抛出异常。
栏目列表
最新更新
nodejs爬虫
Python正则表达式完全指南
爬取豆瓣Top250图书数据
shp 地图文件批量添加字段
爬虫小试牛刀(爬取学校通知公告)
【python基础】函数-初识函数
【python基础】函数-返回值
HTTP请求:requests模块基础使用必知必会
Python初学者友好丨详解参数传递类型
如何有效管理爬虫流量?
SQL SERVER中递归
2个场景实例讲解GaussDB(DWS)基表统计信息估
常用的 SQL Server 关键字及其含义
动手分析SQL Server中的事务中使用的锁
openGauss内核分析:SQL by pass & 经典执行
一招教你如何高效批量导入与更新数据
天天写SQL,这些神奇的特性你知道吗?
openGauss内核分析:执行计划生成
[IM002]Navicat ODBC驱动器管理器 未发现数据
初入Sql Server 之 存储过程的简单使用
这是目前我见过最好的跨域解决方案!
减少回流与重绘
减少回流与重绘
如何使用KrpanoToolJS在浏览器切图
performance.now() 与 Date.now() 对比
一款纯 JS 实现的轻量化图片编辑器
关于开发 VS Code 插件遇到的 workbench.scm.
前端设计模式——观察者模式
前端设计模式——中介者模式
创建型-原型模式