منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

تفضل اخي
هذا كود لعمل اجمال الفواتير
 وهذا كود لعمل اجمالي عدد الفواتير

وهذا المثال بعد التعديل عليه

(24-03-19, 11:48 PM)Emam emam كتب : [ -> ]تفضل اخي
هذا كود لعمل اجمال الفواتير

PHP كود :

Dim sum As Double
            For s As Integer = 0 To ADataGridView.RowCount - 1
                sum = sum + ADataGridView.Rows(s).Cells(2).Value
            Next
            TextBox3.Text = (sum) 


 وهذا كود لعمل اجمالي عدد الفواتير

PHP كود :

       TextBox2.Text = ADataGridView.RowCount - 1 


وهذا المثال بعد التعديل عليه

شكرا لكل القائمين على هذا العمل وشكر خاص للاستاذ emam

(25-03-19, 09:49 PM)EMADSSS كتب : [ -> ]

(24-03-19, 11:48 PM)Emam emam كتب : [ -> ]تفضل اخي
هذا كود لعمل اجمال الفواتير

PHP كود :

Dim sum As Double
            For s As Integer = 0 To ADataGridView.RowCount - 1
                sum = sum + ADataGridView.Rows(s).Cells(2).Value
            Next
            TextBox3.Text = (sum) 


 وهذا كود لعمل اجمالي عدد الفواتير

PHP كود :

       TextBox2.Text = ADataGridView.RowCount - 1 


وهذا المثال بعد التعديل عليه

شكرا لكل القائمين على هذا العمل وشكر خاص للاستاذ emam

لو سمحتم كيف بقدر اتجاهل الخلايا الفارغة  في جمع الفواتير لان بحال وجود اي خلية فارغة ماعم يجمع الارقام  وشكرا

تعال على هذا السطر 

واجعله بهذا الشكل

اخي الكريم جربت الكود عم يعطي ناتج الجمع صفر

كمثال ان قيمة sum كالتالى

سيتحول الى

شكرا الك اخي الكريم