vb点虐线程参数 vbnet 多线程

VB.NET线程内调用带参数的方法异常

报错信息是什么？截图一下。

创新互联公司成立于2013年，我们提供高端网站建设、成都网站制作、成都网站设计、网站定制、营销型网站、微信平台小程序开发、微信公众号开发、成都网站营销服务，提供专业营销思路、内容策划、视觉设计、程序开发来完成项目落地，为成都办公空间设计企业提供源源不断的流量和订单咨询。

---------补充----------------

你这报错与线程应该关系不大吧，是调用COM不熟悉造成的，在项目属性里面有些相关配置你研究研究。

Sub Main()

Dim thr As New Thread(AddressOf 循环)

thr.Start("a")

End Sub

Sub 循环(a() As String)

'这里随你干什么循环也行

For Each i As String In a

MsgBox(i)

End Sub

看懂了吧参数只能有一个也可以不是数组，在a() As String的a后面去掉括号就行

Public Class Form1

Public Class SquareClass '把多线程调用的函数封装到类中，通过类事件返回

Public Value As Double

Public Square As Double

Public Event ThreadComplete(ByVal Square As Double)

Public Sub CalcSquare()

Square = Value * Value

RaiseEvent ThreadComplete(Square)

End Sub

End Class

Dim WithEvents oSquare As SquareClass

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '多线程返回值测试，当线程运行完成激发事件

oSquare = New SquareClass()

Dim t As New Threading.Thread(AddressOf oSquare.CalcSquare)

oSquare.Value = 30

t.Start()

End Sub

Sub SquareEventHandler(ByVal Square As Double) Handles oSquare.ThreadComplete '响应事件函数

MsgBox("The square is " Square)

End Sub

End Class

网页名称：vb点虐线程参数 vbnet 多线程
URL标题：http://cdxtjz.com/article/ddjjeep.html