线程 Thread
多线程的概念参考: 多线程.
多线程的作用,实现程序的并发操作,避免程序的“死机”状态
Me.Invoke()
在多线程中,如果在非UI线程中去操控控件,比如更新TextBox中值,直接使用会报错:线程间操作无效,从不是创建xxx控件的线程访问它。
TextBox.AppendTxt = "增加!"
这是因为VB中禁止跨线程直接访问控件,InvokeRequired
是为了解决这个问题而产生的,当一个控件的InvokeRequired
属性值为True
时,说明有一个创建它以外的线程想访问它。
当我们想要跨线程访问控件时,就需要用到委托, 根据委托的方法类型选择委托的方式 Action 、Func
Sub ShowMsg(ByVal Msg As String) '显示信息
If Me.InvokeRequired = True Then
action = AddressOf ShowMsg
Me.Invoke(action, Msg)
Else
TxtMsg.AppendText(Msg)
End If
End Sub
实现跨线程访问的步骤:
- ①定义需要实现的方法:例如上文中修改
TextBox
中的值 - ②判断相关控件是否收到跨线程通知:
Me.InvokeRequired
- ③实例化委托
- ④触发委托
触发委托使用的是Me.Invoke()
:在拥有控件的基础窗口句柄的线程上(本文为主线程)用指定的自变量列表执行指定委托,因为回到了主线程,所以调用showmsg()方法时,判断是否跨线程访问时,显示值为False
其原型为:
Function Control.Invoke(method as [Delegate] , ParamArray args As Object())
切勿混淆Me.Invoke() 与 Action.Invoke()
Action.Invoke()原型是:(以Dim action As Action
为例)
Sub System.Action(Of String).Invoke(Object As String)
上文中的Invoke
需要调用系统的Invoke
。
参考
https://blog.csdn.net/xuemoyao/article/details/8043379
https://www.cnblogs.com/songxingzhu/p/3677307.html