VS2010-VB.NET实现wait延时处理



vb中可以使用sleep()方法，但在，VS2010中，没有sleep函数。 通过线程Threading.Thread.Sleep()可以实现延时等待的效果，但是，这话导致整个程序都会等待。

如果，只是希望程序的某个操作延时处理，而不影响其他操作，可以使用下面的方法

添加一个Timer控件waitTm，
定义两个全局变量 afterTm(延时时间)，waitFlg(延时flg)

初始化
afterTm=""
waitFlg=False
waitTm.Enabled = False '非活性

首先在需要延时处理的地方 定义需要延时的时间

afterTm = DateTime.Now.AddSeconds(n).ToString

waitTm.Enabled = True '活性

※n代表需要延时的时间，秒。也可以使用AddMinutes()分钟。

Timer控件事件处理

Private Sub waitTm_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles waitTm.Tick

        Dim nowTm As String = DateTime.Now.ToString

        If afterTm.Equals(nowTm) Then
            flg = True
        End If

        If flg Then
            waitTm.Enabled = False
           
     '继续想要做的其他操作

        End If
    End Sub

以上，仅记录个人的工作经验，仅供参考。