VB.NET学习笔记：多线程加委托实现等待窗体（loading正在加载界面)，运行超时可以取消操作

zyjq52uys

于 2019-04-15 15:22:31 发布

阅读量2.5k

点赞数 2

分类专栏： VB.NET学习笔记文章标签：多线程委托等待窗体正在加载窗口

本文链接：https://blog.csdn.net/zyjq52uys/article/details/89312407

版权

这篇VB.NET学习笔记介绍了如何通过多线程和委托来创建等待窗体（loading界面），并解决了异步委托无法控制线程进度的问题，使得运行超时或用户取消时能够有效终止操作。文章详细阐述了使用Thread的ThreadState属性监测线程状态以及Abort方法中断进程的方法。

摘要由CSDN通过智能技术生成

在《异步委托实现等待窗体（loading界面)，执行任务超时可以取消操作》一文，通过异步委托貌视能很好的实现了所要的效果，但因异步委托无法控制线程进度，也就是说不能人工干预线程，所以取消操作就是一摆设，存在BUG，本文通过多线程修改了该BUG。
正在加载界面

等待窗体WaitForm代码如下：

Imports System.Threading

Public Class WaitForm
    Private _MaxWaitTime As Integer
    Private _WaitTime As Integer
    Private _CancelEnable As Boolean
    Private _AsyncResult As IAsyncResult
    Private _method As MethodInvoker
    Dim th As Thread
    Public Property Message As String
    Public Property TimeSpan As Integer


    Public Sub New(ByVal method As MethodInvoker, ByVal maxWaitTime As Integer, ByVal waitMessage As String, ByVal cancelEnable As Boolean, ByVal timer