189 8069 5689
在多线程中你需要定义委托来修改控件属性
在尼玛等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供网站设计、做网站 网站设计制作按需开发,公司网站建设,企业网站建设,成都品牌网站建设,网络营销推广,外贸网站制作,尼玛网站建设费用合理。
比如你修改Textbox属性，则：
Delegate Sub dl_ShowTextbox(ByVal iStr As String)
Public Sub ShowTextbox(ByVal iStr As String)
If Textbox.IsDisposed Then
Return
End If
If Textbox.InvokeRequired = True Then
Dim pInvoke As New dl_ShowTextbox(AddressOf ShowTextbox)
Me.Invoke(pInvoke, New Object() {iStr})
Else
Textbox.Text = iStr
End If
End Sub
在多线程中调用
ShowTextbox( "要显示的内容" )
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
简单回答：
1、当前来说，编程与运行环境合适的情况下，VB.net与VB都有实现多线程的可能。
2、VB、VB.net的最基本的概念，是调用系统的接口进行编程，只要系统提供“多线程”的功能调用，它们就能实现多线程。
3、VB注意于面向用户，面向任务，其高级的一些程序实现需要直接调用win的API，VB实现多线程的例子也可以在网络上搜索到。
一、关于VB、VB.net的相关知识：
1、编程指的是用人类能理解的语言来编写指令集，并通过专用的编译软件或环境来转化这些指令，使得这些指令能让计算机识别，从而控制计算机做人类需要进行的工作。
2、也就是说无论是VB.NET还是VB它们都只是“人类能理解的语言”，它们通过专用的编译软件或环境来转化这些指令，进而操作电脑。
3、进一步特化到VB上去说。VB基于VB的运行库，它的运行库又基于win的API（（Application Programming Interface,应用程序编程接口）是一些预先定义的函数），也就是说，VB的很多（多到90%以上）的功能是直接基于调用windows提供的一些基本接口函数。
4、VB.net有什么不同呢，它基于.net运行库。什么 意思？这个意思就是，微软发现win的API不够用了，不好用了，就打算在windows上加装点东西，让它有更多的接口函数。但要注意的是，多数情况下，这些接口比win的API的效率要低一些。在win7及以后的版本的win中，已经自含了.net运行库。
5、顺便说，为什么很多人会发现win7的运行速度看起来要比xp慢呢，个人认为就是因为调用的是.net的接口来实现的，.net就是比API的慢。当然了，.net的功能上要比xp原有的API的功能强。
6、VB与VB.net在语法上是非常近似的，只是因为Visual Studio的版本不同，后期的Visual Studio已不提供简纯的VB了，注意它们的不同主要是后台核心调用的理念上的不同。
首先，你把你那些要运行很久的过程。尽量放在一个过程中。
因为线程只能是过程，不能使函数，没有返回值的。
然后，在某个事件下这样写：
**这里我假设你的那个很就的过程叫做 sub aaa()
调用如下：
Dim mythread As New System.Threading.Thread(AddressOf aaa)
mythread.Start()
***********
这样就是定义一个线程，名字叫 mythread，这个线程会运行aaa这个过程。
start 就是让线程运行。
Private Sub setA()
msgbox("")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim t1 As Threading.Thread = New Threading.Thread(AddressOf setA)
t1.start
End Sub
这个线程对象一定有个完成时或者进行中的动作，你可以用AddHandler语句来将过程委托给ProcessChanged或者ProcessConpleted动作。