VB.net Як використовувати багатопотокове сканування?

Ісінвен · Опубліковано 2019-10-30 17:20:14

  Як показано на рисунку, після імпорту URL потрібно використовувати багатопотокове сканування. Я не знайшов код, який можна реалізувати онлайн. Будь ласка, порадьте.

Приватний сабреддіт Button2_Click(відправник як об'єкт, e як EventArgs) обробляє кнопку2.Клік
      ListBox2.Items.Clear()
      Scan_Flag = 1
      Scan_Index = 0
      Scan_Max = ListBox1.Items.Count
      ProgressBar1.Мінімум = 0
      ProgressBar1.Maximum = Scan_Max
      ProgressBar1.Значення = 0
      Для x As Int32 = 1 To Val(ComboBox1.Text) ' combobox1.text — це кількість потоків
         Dim go As New Threading.Thread(AddressOf scan)
         Іди. Start()
      Далі
      Timer1.Start()

Кінець субтитри

Субсканування()
      Dim index, max As Int32
      max = ListBox1.Items.Count
      Для i Як Int32 = 0 до ListBox1.Items.Count - 1
         Якщо Scan_Flag = 0, то вихід для
         Dim url As String = ListBox1.Items.Item(i) & "/index.php"
         index = Threading.Interlocked.Increment(Scan_JD)

         Dim temp As String = Scanurl(url)

            ListBox2.Items.Add(url & "--" & temp)
            Label1.Text = "сканування" та url

      Далі
      Label1.Text = "сканування над"
Кінець субтитри

Як я можу виконати багатопотокове та синхронне сканування? Як правильно написати речення?

[Зв'язок] VB.net Як використовувати багатопотокове сканування?

Переглянуті розділи