public class threadclass
创新互联-专业网站定制、快速模板网站建设、高性价比五指山网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式五指山网站制作公司更省心,省钱,快速模板网站建设找我们，业务覆盖五指山地区。费用合理售后完善，10年实体公司更值得信赖。
{
public int a;
public void threadmethod()
{
//use a;
}
}
...
threadclass tc = new ....
tc.a = 10;
Thread t = new ThreadStart(tc.threadmethod);
t.Start
多线程是用于处理复杂项目的
打个比方
你的主程序线程A中有个循环，由于代码是一行行走的，所以循环结束前下面的代码无法运行，而此时主界面的反应就类似卡死的样子，你点击按钮也没有反应，因为主线程在忙着循环呢，所以对按钮的事件代码要等待了，如果要避免这种情况，就要用到多线程，另开一个新线程专门用来执行循环代码，主界面就不会卡死了，只要在循环结束后将结果传回主线程调用就可以了，再复杂点要涉及到委托，控制了
按你的要求其实你的代码用不到多线程，只要把sleep放到两段代码中间就可以了。
新线程结束用thread.abort()
Sub Main()
Dim thr As Thread
For Pi As Integer=0 To 4 //启用5线程
MulParams =Pi vbTab sFile vbTab dFile vbTab 1 vbTab DelN vbTab cr vbTab cg vbTab cb vbTab IndexI
GlobalParamas(pi)=MulParams .Split(vbTab)
thr=New Thread(AddressOf MyMulThreadCaller)
thr.Start() //启动多线程进程
Application.DoEvents
Next
End Sub
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)
Next
End Sub
看懂了吧 参数只能有一个 也可以不是数组，在a() As String的a后面去掉括号就行
