[RaggiTech]

نقطة هامة اضافية

عندما نبدأ تشغيل المسار نكتب

كود :

Me.BackgroundWorker1.RunWorkerAsync()

لكن يمكن أن ترسل برامتر للحدث DoWork وهذا البرامتر تلقفه العنصر e الخاص بالحدث


كمثال :

كود :

Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork

For I As Integer = 0 To CInt(e.Argument)

If Me.BackgroundWorker1.CancellationPending Then
e.Cancel = True
Return
End If
Me.BackgroundWorker1.ReportProgress(I)
System.Threading.Thread.Sleep(100)
Next

End Sub

هنا كتبنا حلقة For من صفر حتى e.Argumen


لكن ما قيمة e.Argumen


قيمتها ترسل كبرامتر أثناء اطلاق شعلة البدء

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.ProgressBar1.Value = 0
Me.BackgroundWorker1.RunWorkerAsync(100)

End Sub