خطأ بعد استخدام العمل في الخلفية

PHP كود :
Public Class Form1
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        Control.CheckForIllegalCrossThreadCalls = False
    End Sub


Private Sub BackgroundWorker2_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker2.DoWork
        GetTootel()
    End Sub

    Sub GetTootel()

        Me.SubscribersBindingSource.MoveFirst()
        Me.EventdataBindingSource.MoveFirst()

        Label7.Text = " 0"
        Label10.Text = "0"
        Label11.Text = "0"

        Dim tot As Double = 0
        Dim ooo As Double = 0

        For Each i As DataGridViewRow In SubscribersDataGridView.Rows
            With DataGridView1()
                For Each d As DataGridViewRow In DataGridView1.Rows

                    tot += CDbl(d.Cells("PriseDataGridViewTextBoxColumn").Value)

                Next

            End With
            For Each d As DataGridViewRow In DataGridView1.Rows
                ooo += CDbl(d.Cells("DiscountDataGridViewTextBoxColumn").Value)
            Next
            SubscribersBindingSource.MoveNext()
        Next

        Label10.Text = ooo
        Label7.Text = tot
        Label11.Text = Val(Label7.Text - Label10.Text)

        Label17.Text = SubscribersDataGridView.RowCount

        Panel1.Enabled = True
        SubscribersBindingNavigator.Enabled = True

    End Sub

Private Sub Button17_Click(sender As System.Object, e As System.EventArgs) Handles Button17.Click
     Panel1.Enabled = False
        SubscribersBindingNavigator.Enabled = False
        BackgroundWorker2.RunWorkerAsync()
    End Sub
End Class