读书人

vb.net多线程有关问题

发布时间: 2012-09-08 10:48:07 作者: rapoo

vb.net多线程问题
[code=VB.NET][/code]
Imports System.Threading
Public Class Form1
Public Sub Method1()
Dim i As Integer
For i = 1 To 100
' Console.Writeline("这是类AClass方法method1的内容", i)
RichTextBox1.Text &= (("这是method1的内容:" & i) & vbCrLf)
Next
End Sub

Public Sub Method2()
Dim i As Integer
For i = 1 To 100
' Console.Writeline("这是类AClass方法method2的内容", i)
RichTextBox1.Text &= (("这是method2的内容:" & i) & vbCrLf)
Next
End Sub
Public Overloads Function invoke(ByVal method As [Delegate])
Return True
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Dim aclass As New AClass
Dim th1, th2 As Thread
th1 = New Thread(New ThreadStart(AddressOf Method1))
th1.Start()
th2 = New Thread(New ThreadStart(AddressOf Method2))
th2.Start()
Dim i As Integer
For i = 0 To 100
' RichTextBox1.Text = Console.WriteLine("Main方法里的内容", i)
RichTextBox1.Text = ((i) & vbCrLf)
Next
End Sub
End Class

RichTextBox1.Text &= (("这是method1的内容:" & i) & vbCrLf) 这里提示:线程间操作无效: 从不是创建控件“RichTextBox1”的线程访问它。
请问该怎么做呢?

[解决办法]
在load事件中写上: CheckForIllegalCrossThreadCalls = False

读书人网 >VB Dotnet

热点推荐