vb.net 教程 6-9 传值给线程1

当前位置:

Thread类的Start方法可以启动线程，同时还可以传一个值给线程：

'声明

Public Sub Start ( _

parameter As Object _

)

所传的值是Object类型，对应调用的方法中需要增加一个Object参数。

以下代码中sample4_PrintName方法需要传入一个名字

Sub sample4()

Dim sample4_Thread As New Thread(AddressOf sample4_PrintName)

sample4_Thread.Start("张三")

sample4_Thread.Join()

Console.Write("End")

Console.ReadKey()

End Sub

Sub sample4_PrintName(ByVal pName As Object)

Dim testName As String = CType(pName, String)

For i As Integer = 0 To 10

Console.WriteLine(i & ":" & testName & ",")

End Sub

当使用Start("张三")传入后，sample4_PrintName中将传入的object数据转为String类型再使用：

由于每次只能传入一个数据，如果要传入多个数据，可以考虑使用数组、Dictionary、类、结构等等。

下面是一个传递Dictionary值给线程的例子：

Sub sample4_1()

Dim stu As New Dictionary(Of String, String)

stu.Add("name", "zhangsan")

stu.Add("age", "12")

Dim sample4_Thread As New Thread(AddressOf sample4_1_PrintName)

sample4_Thread.Start(stu)

sample4_Thread.Join()

Console.Write("End")

Console.ReadKey()

End Sub

Sub sample4_1_PrintName(ByVal student As Object)

Dim teststu As Dictionary(Of String, String) = CType(student, Dictionary(Of String, String))

For Each kvp As KeyValuePair(Of String, String) In teststu

Console.WriteLine(kvp.Key & ":" & kvp.Value)

End Sub

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程目录

————————————————

原文链接：https://blog.csdn.net/UruseiBest/article/details/87893123

栏目列表