19-06-18, 08:27 AM
السلام عليكم ورحمة الله وبركاته
هل هناك طريقة لتسريع هذا الكود لآنه يتوقف تماما الى ان ينتهى
وجربت الثريد وال 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
من جلب النص المطلوب