VB.net 2010 视频教程 VB.net 2010 视频教程 c#入门经典教程
当前位置:
主页 > 编程开发 > c#教程 >
  • C#教程之C#实现延时并自动关闭MessageBox的方法

  • 2017-07-16 20:46 来源:未知

我们在C#编程中常见的信息提示框(MessageBox)是微软NET自带的一个用于弹出警告、错误或者讯息一类的“模式”对话框。此类对话框一旦开启,则后台窗体无法再被激活(除非当前的MessageBox被点击或者关闭取消)。那么如何使用程序模拟鼠标点击这个messageBox(关闭这个MessageBox)令其延时并自动关闭呢?答案是你在弹出这个messageBox之前先启用一个定时器,定时器内部不断向窗体发送Enter按钮用于模拟点击MsgBox的内容,同时主程序中弹出模式消息框。

具体实现代码如下(本程序运行测试环境基于VS2012 RC 编写):

我们假设窗体上就只有一个Button,点击这个Button将弹出5个msgbox,同时每个msgbox将延时2秒后自动关闭。

C#功能代码如下:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
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,否则会抛出异常。

相关教程
关于我们--广告服务--免责声明--本站帮助-友情链接--版权声明--联系我们       黑ICP备07002182号