VB.net Hoe gebruik ik multithreaded scanning?

ixinwen · Geplaatst op 30-10-2019 17:20:14

  Zoals te zien is in de figuur, wil je na het importeren van de URL multithreading scannen gebruiken. Ik heb geen code gevonden die online geïmplementeerd kan worden. Graag advies.

Private sub Button2_Click(afzender als object, e als EventArgs) behandelt Button2. Klik
      ListBox2.Items.Clear()
      Scan_Flag = 1
      Scan_Index = 0
      Scan_Max = LijstDoos1.Items.Aantal
      ProgressBar1.Minimum = 0
      ProgressBar1.Maximum = Scan_Max
      ProgressBar1.Waarde = 0
      Voor x Als Int32 = 1 Tot Val(ComboBox1.Text) ' combobox1.text is het aantal threads
         Dim go Als Nieuwe Threading.Thread(AddressOf-scan)
         Ga. Start()
      Volgende
      Timer1.Start()

Einde Sub

Subscan()
      Dimindex, max Als Int32
      max = LijstDoos1.Items.Aantal
      Voor i Als Int32 = 0 Aan LijstBox1.Items.Aantal - 1
         Als Scan_Flag = 0, dan sluit voor
         Dim url Als 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 = "scaning " & url

      Volgende
      Label1.Text = "scan over"
Einde Sub

Hoe kan ik multithreaded en synchroon scannen uitvoeren? Hoe moet de zin correct geschreven worden?

[Communicatie] VB.net Hoe gebruik ik multithreaded scanning?

Secties bekeken