多线程问题,InvokeRequired总是返回False
我的一个socket监听类,想向界面控件textbox1里添加监听的信息
代码如下:
Public Sub addTxt(ByVal str As String)
If mainForm.TextBox1.InvokeRequired = True Then
Dim d As addtextCallback = New addtextCallback(AddressOf addTxt)
mainForm.Invoke(d, str)
Else
mainForm.TextBox1.Text += str
End If
End Sub
Public Delegate Sub addtextCallback(ByVal str As String)
可我使用InvokeRequired时总是返回flase,所以直接进入else.但是界面控件并没有任何显示!! 大家帮我看看啊.
[解决办法]
调用addTxt的代码？
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本：20070212
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
