2,VB.net 多线程IP扫描，同时返回，同一个委托感觉丢失响应。

Sub txt(ByVal AAA As String) Dim A As Integer Dim B As Integer Dim C As Integer A = InStr(AAA, "时间") B = InStr(AAA, "%%%") C = Val(Strings.Left(AAA, B - 1)) If A > 0 Then 'Label1.Text = "存在" LTX(C).BackColor = Color.Green Else 'Label1.Text = "不存在" LTX(C).BackColor = Color.Red End If
End Sub
Private Sub setA() '多线程 Dim Dg_txt As New Dg(AddressOf txt) '定义,实例化一个委托,指向txt这个过程 'SS_MAC(i) = GetMac("10.103.8." & i) Me.Invoke(Dg_txt, i - 1 & "%%%" & GetMac("10.103.8." & i - 1)) '执行指定的委托,将n传进去
End Sub

个人觉得委托不是这么用 的。

Sub ShowTimes() '涉及窗体控件修改的过程，此过程需要被委托来调用
Label1.Text = tCount.ToString
End Sub
Delegate Sub vShowTimes()’委托声明，命名的时候，在ShowTimes前面加小v，简明
在新线程中调用委托对控件进行修改的方法：
Invoke(New vShowTimes(AddressOf ShowTimes))

VB.Net。。。玩得很少。。。

个人觉得多线也不是这么玩的

多线程最重要是各个线程的时序。
一个函数，被用来启动线程后（即传入了这个函数的地址为线程启动地址），这个函数就类似于一个类实例化的对象。如果重复从一个函数创建线程，也就是，创建了两个以同一个函数地址为启动地址的。
他们之间是互不干扰的。为了达到管理他们的目的。需要在线程中加入一个全局变量。可以通过改动全局变量，来约束线程在执行的过程中的状态。