[ابو روضة]

السلام عليكم ورحمة الله وبركاته

هل هناك طريقة لتسريع هذا الكود لآنه يتوقف تماما الى ان ينتهى

وجربت الثريد وال BackgroundWorker معه وبيظهر خطأ

وهو لجلب نص فى التكست بوكس بعد تحميل صفحة معينة والكود شغال تمام لكن بيجعل

الفورم معلق ولا يتحرك وانا اريد تسريعه بحيث يتحرك عادى ولا يهنج

PHP كود :

RichTextBox1.Text = WebBrowser1.Document.GetElementsByTagName("colo")
m = Regex.Match(RichTextBox1.Text, "(?<=accesto"").+(="")")
TextBox6.Text = m.Value 


واخر تجربة كانت هكذا وايضا يأتى خطأ

PHP كود :

Dim thread2 As System.Threading.Thread
Public Sub darkness1()

RichTextBox1.Text = WebBrowser1.Document.GetElementsByTagName("colo")
m = Regex.Match(RichTextBox1.Text, "(?<=accesto"").+(="")")
TextBox6.Text = m.Value

End Sub
وهذا فى الزر

thread1 = New System.Threading.Thread(AddressOf darkness1)
thread1.Start()

وده فى الفورم لود

CheckForIllegalCrossThreadCalls = False 


فهل هناك طريقة لعدم تهنيج هذا الكود لآن الويب براوزر بخلى البرنامج يتوقف تماما الى ان ينتهى
من جلب النص المطلوب

[elgokr]

ارفق مثال مصغر حتى يتم اختبار الكود

مع عمل المطلوب من ثم اعادة ارفاقة له

تحياتى لك

[YousefOkasha]

تفضل اخي جرب هذا الكود ..

كود :

Try
&Vbcode
Catch ex as Exception
Msgbox (ex.message)
End Try

و بدلا من كلمه &Vbcode ..
اكتب الكود الذي يأتي منه خطأ