-1
這裏的第一個問題,以及它關於vb.net的線程。我最近獲得了一個程序的源代碼,我希望對錶單做出自己的更改和修改,但似乎無法更改允許的最大線程數。該程序允許的最大線程數爲兩個線程,它們轉到Netflix並登錄,從而恢復帳戶的信息。它最多有兩個線程,但它也是無代理的。 我包含線程池所在代碼的一部分,我很想知道在哪裏編輯它,而我可以更改線程的最大數量。我試圖尋找某些關鍵字,但沒有找到任何有用的信息。VB.Net線程池允許的最大線程數
Private Sub ButtonX1_Click(sender As Object, e As EventArgs) Handles ButtonX1.Click
If (Me.usernames.Count > 0) Then
If (Me.ButtonX1.Text = "Start") Then
Me.NumericUpDown1.Enabled = False
Me.ProgressBarX1.Maximum = Me.usernames.Count
Me.ProgressBarX1.Value = 0
Me.thread_status = True
Me.available = 0
Dim workerThreads As Integer = Me.NumericUpDown1.Value
ThreadPool.SetMinThreads(workerThreads, workerThreads)
ThreadPool.SetMaxThreads(workerThreads, workerThreads)
ServicePointManager.DefaultConnectionLimit = workerThreads
ServicePointManager.Expect100Continue = False
Dim str As String
For Each str In Me.usernames
ThreadPool.QueueUserWorkItem(New WaitCallback(AddressOf Me.Lam__R141), str)
Next
Me.ButtonX1.Text = "Stop"
Me.Label3.Text = "Cracking Start"
Else
Me.NumericUpDown1.Enabled = True
Me.thread_status = False
Me.ButtonX1.Text = "Start"
Me.Label3.Text = "Cracking Stop"
End If
Else
Me.Label3.Text = "Load Combolist"
End If
End Sub
ThreadPool.SetMaxThreads(workerThreads,workerThreads)可能需要更改。 – N0Alias
你有什麼建議嗎? –
您是否嘗試更改'NumericUpDown1'的值? –