首先,你把你那些要运行很久的过程。尽量放在一个过程中。
创新互联建站专注于龙里网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供龙里营销型网站建设,龙里网站制作、龙里网页设计、龙里网站官网定制、成都微信小程序服务,打造龙里网络公司原创品牌,更为您提供龙里网站排名全网营销落地服务。
因为线程只能是过程,不能使函数,没有返回值的。
然后,在某个事件下这样写:
**这里我假设你的那个很就的过程叫做 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
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
分享题目:vb点虐
增加线程 vbnet可以动态增加线程吗
新闻来源:https://www.cdcxhl.com/article10/ddsjcgo.html
成都网站建设公司_创新互联,为您提供网站设计公司、App设计、品牌网站制作、Google、商城网站、定制开发
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联