110,533
社区成员
发帖
与我相关
我的任务
分享
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim t As Thread
t = New Thread(AddressOf 长循环1)
t.Start()
Dim t2 As Thread
t2 = New Thread(AddressOf 长循环2)
t2.Start()
end sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ThreadPool.QueueUserWorkItem(AddressOf 长循环1)
ThreadPool.QueueUserWorkItem(AddressOf 长循环2)
end sub