vb.net 怎么新建线程

首先，你把你那些要运行很久的过程。尽量放在一个过程中。因为线程只能是过程，不能使函数，没有返回值的。然后，在某个事件下这样写：这里我假设你的那个很就的过程叫做 sub aaa()调用如下：Dim mythread As New System.Threading.Thread(AddressOf aaa)mythread.Start()这样就是定义一个线程，名字...

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 Thre...

在实例化该线程后,你可以通过调用线程的Start()方法来开始执行代码。控制线程在线程启动后,你可以通过线程对象的一个方法来控制它的状态。你可以通过调用Thread.Sleep方法来暂停一个线程的执行,这个方法可以接收一个整型值,用来决定线程休眠的时间。拿前面的例子来说,如果你想让列表项目增加的速度变慢,可以在其中放入...

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后面去掉...

t1 = New Threading.Thread(AddressOf sDownFile) 你这句都没代入参数啊。改成这样试试 t1 = New Threading.Thread(AddressOf sDownFile(参数1，参数2))

多个线程执行的时候，是按CPU时钟轮番执行的，你可以在两个SUB中增加一条输出到即时窗口：debug.print test_time 看不出你的test1和test2做什么用的？

最简单的方法是 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Control.CheckForIllegalCrossThreadCalls = False'加入这句代码就可以在别的线程访问窗体控件了 End Sub

Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click Dim MyThread As New Threading.Thread(AddressOf c)MyThread.Start()End Sub Private Sub c()Dim d As New MethodInvoker(AddressOf a)Me.Invoke(d)End Sub ...

建议你使用BackGroundWorker控件。将代码写入控件的事件中，使用它的Start方法就可以开始工作了。是与主程序同时进行的。

以下是在多线程中显示进度条代码 '定义一个委托 Delegate Sub dl_ShowProgress(ByVal iValue As Integer)Public Sub ShowProgress(ByVal iValue As Integer)If ProgressBar1.IsDisposed Then Return End If If ProgressBar1.InvokeRequired = True Then Dim pInvoke As New dl_ShowProgress(AddressOf ...