دسترسی به اشیاء یک Thread از داخل Thread دیگر
با توجه به اینکه نمیشه وقتی یک پروسس جدید ایجاد شده در اون پروسس از اشیا فرم استفاده کرد کسی هست بهم بگه اگر نخوام از دستور زیر استفاده کنم چجوری میتونم مقدار تابع زیر رو که از پروسس استفاده میکنه داخل تکس باکس قرار بدم؟
textbox1.text = ChkStation()
اینم نحوه ایجاد یک روند غیر همزمان :
Dim thread AsNew System.Threading.Thread(AddressOf ChkStation)
thread.IsBackground = True
thread.Priority = Threading.ThreadPriority.Highest
thread.Start()
اینم تابع:
PrivateFunction ChkStation() AsString
Dim Sstring AsString = ""
For i AsInteger = 1 To 255
Dim x AsNew Net.NetworkInformation.Ping()
Dim ip AsString = "192.168.1." & Trim(Str(i))
If x.Send(ip, 0.001).Status = Net.NetworkInformation.IPStatus.Success Then
Dim b AsString = System.Net.Dns.Resolve(ip).HostName.ToString()
Sstring = b + vbCrLf + Sstring
EndIf
Next i
Return Sstring
EndFunction
نقل قول: دسترسی به اشیاء یک Thread از داخل Thread دیگر
سلام
داخل تابع ChkStation این رو بنویس:(مثلاً خط اول)
Control.CheckForIllegalCrossThreadCalls =
False
حالا هر جا خواستی می تونی از اشیا فرمت استفاده کنی...