[mohamedahmed1]

مرحبا اخواني

تم الوصول الي هذا الحل المؤقت ولكنه يسبب تجمد البرنامج

الكود

كود :

Private Async Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
      Dim btn = driver.FindElements(By.TagName("button"))
      For Each item In btn
          If item.GetAttribute("className").Contains("_54k8 _52jg _56bs _26vk _56bu") Then
              item.Click()
              Await Task.Delay(NumericUpDown1.Value * 1000)
          End If
      Next item
  End Sub

وكود التشغيل

كود :

Timer1.start