[Emam emam]

(02-10-19, 07:09 AM)asemshahen5 كتب : الغ -1

الله عليك تسلم ايدك اخي
كده اشتغل معايا 100 %
والله لا اعرف كيف اشكرك
جزاك الله عنا كل خير
وجعله في ميزان حسناتك ان شاء الله

[asemshahen5]

السلام عليكم فرغ صندوق الرسائل الخاصة عندك الصندوق ممتلئ و ضع مثالا مصغرا فيه الخطأ اما بمرفقات الموضوع او في ميديا فاير او في غوغل درايف .

[Emam emam]

(06-10-19, 08:22 PM)asemshahen5 كتب : السلام عليكم فرغ صندوق الرسائل الخاصة عندك الصندوق ممتلئ و ضع مثالا مصغرا فيه الخطأ اما بمرفقات الموضوع او في ميديا فاير او في غوغل درايف .

تفضل اخي هدا جزء من المشروع 
بعد تشغيل المشروع قم بتحديد التاريخ من شهر 1 حتي يقوم بجلب بانات كثيره فيكون الامر اكثر وضوحا 
بعد تحميل البيانات ستجد البرنامج يقف لعدة لحظات وبعدها تجد ال scrollbar  لا يتحرك معك حتي لو وصلت لاخر حاجه في الداتا جريد فيو
واشكرك كثيرا اخي علي تواضعك واهتمامك

[Emam emam]

السلام عليكم اخوتي
اولا اشكر اخي  asemshahen5 
فقد اتعبته كثيرا في هدا الموضوع
ولكن متبقي جزئيه بسيطه لعلي اجد الحل ان شاء الله
وهي ان ال  Preogress bar  لا يظهر الا بعد انتهاء تحميل البيانات ويظهر  للحظه ويختفي
واريد ان يظهر ال Preogress bar  ويتقدم مع تحميل البيانات وبعد الانتهاء يختفي
هدا جزء من المشروع 
ارجو التعديل عليه وجزاكم الله خير الجزاء


  BackGroundWorker.zip (الحجم : 555.07 ك ب / التحميلات : 13)

[asemshahen5]

هذا الملف بعد التعديل :

[Emam emam]

(09-10-19, 04:11 PM)asemshahen5 كتب : هذا الملف بعد التعديل :

جزاكم الله خير الجزاء اخي 
سأجرب واوافيك بالاخبار ان شاء الله

[Emam emam]

(09-10-19, 04:11 PM)asemshahen5 كتب : هذا الملف بعد التعديل :

السلام عليكم اخي asemshahen5
والله يا اخي يعجز لساني عن شكرك
لا اعرف كيف اشكرك
جزاك الله عني وعن كل الجروب خير الجزاء وجعله الله في ميزان حسناتك
اهم مشكلتين عندي تم حلهم بفضل الله ثم مساعدتك لي
بارك الله فيك  اخي
وهناك شيئ بسيط في نفسي واطمع في كرمك
وهو اني اريد جمع صف معين في الداتا جريد فيو بعد الانتهاء من التحميل وهدا هو الكود الدي استخدمه ولكن لايعمل مع استخدام ال Backgroundworker

PHP كود :

Dim sum As Double
            For s As Integer = 0 To DataGridView1.RowCount - 1
                sum = sum + DataGridView1.Rows(s).Cells("ActPercent").Value
            Next
            Label20.Text = sum 


[asemshahen5]

ما اسم هذا العامود في جدول قاعدة البيانات ActPercent

أو جرب هذا الكود بعد اللوب :

PHP كود :

Invoke(Sub() RichTextBox1.Text = (From row In DataGridView1.Rows Select CDbl(row.Cells(0).Value)).Sum().ToString("00,000.00")) 


[Emam emam]

(10-10-19, 05:23 AM)asemshahen5 كتب : ما اسم هذا العامود في جدول قاعدة البيانات ActPercent

أو جرب هذا الكود بعد اللوب :

PHP كود :

Invoke(Sub() RichTextBox1.Text = (From row In DataGridView1.Rows Select CDbl(row.Cells(0).Value)).Sum().ToString("00,000.00")) 


جربته اخي ولكن لم ينجح
مع العلم ان الكود في حدث ال Dowork كما يلي 

PHP كود :

Dim sum As Double
        For s As Integer = 0 To DataGridView1.RowCount - 1
            sum = sum + DataGridView1.Rows(s).Cells("ActPercent").Value
            Invoke(Sub() Label20.Text = (From row In DataGridView1.Rows Select CDbl(row.Cells("ActPercent").Value)).Sum().ToString("00,000.00"))
        Next
        Label20.Text = sum 


[asemshahen5]

الغ اللوب الخاص بالجمع و المتغيير sum فقط ضع الكود التالي هو سيقوم بالمطلوب و به اسم الليبل سيعبئها تلقائيا :

PHP كود :

       Invoke(Sub() Label20.Text = (From row In DataGridView1.Rows Select CDbl(row.Cells("ActPercent").Value)).Sum().ToString("00,000.00")) 


مثال :

PHP كود :

   Private Sub BackgroundWorker2_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker2.DoWork
        Invoke(Sub() Label20.Text = (From row In DataGridView1.Rows Select CDbl(row.Cells("ActPercent").Value)).Sum().ToString("00,000.00"))
    End Sub