16,553
社区成员
发帖
与我相关
我的任务
分享
For i = 0 To a.Count - 1
wbh(i) = New wbclass
wbthread(i) = New Thread(AddressOf wbh(i).wb)
wbthread(i).SetApartmentState(ApartmentState.STA)
wbthread(i).Start()
wbthread(i).Join()
RichTextBox1.Text = RichTextBox1.Text & vbCrLf & wbH(i).rHTML
Next
For i = 0 To a.Count - 1
Dim j = i
wbh(i) = New wbclass
wbthread(i) = New Thread(AddressOf wbh(j).wb)
这里要使用 j 而不是 i,这是多线程编程的一个基本的知识。