تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خطأ بعد استخدام العمل في الخلفية
#1
استخدمت هذا الكود لحساب المجموع, لكن الحساب يأخذ وقت طويل لذلك قررت تجربة وضع الأمر في أداة العمل في الخلفية لكن تظهر لي هذه الرسالة أثناء التطبيق:

الكود :

PHP كود :
Public Class Form1
    Private Sub Form1_Load
(sender As System.ObjectAs System.EventArgsHandles MyBase.Load

        Control
.CheckForIllegalCrossThreadCalls False
    End Sub


Private Sub BackgroundWorker2_DoWork(ByVal sender As System.ObjectByVal e As System.ComponentModel.DoWorkEventArgsHandles 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.ObjectAs System.EventArgsHandles Button17.Click
     Panel1
.Enabled False
        SubscribersBindingNavigator
.Enabled False
        BackgroundWorker2
.RunWorkerAsync()
 
   End Sub
End 
Class 


الرسالة :

   
الرد
تم الشكر بواسطة:
#2
WindowsApplication1.rar ?
الرد
تم الشكر بواسطة:
#3
(17-12-16, 01:26 PM)amgad525 كتب : WindowsApplication1.rar ?

?!
الرد
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم