07-01-21, 03:07 AM
(06-01-21, 01:55 PM)السندبااد كتب :أكرمك الله أخي الحبيب سعود، وشكراً على جهودك الطيبة في نفع الآخرين، أسأل الله تعالى أن يجعلها في موازينك
للفائدة أيضاً: يمكن اختصار العملية بسطر واحد فقط من خلال تقنية LINQ:PHP كود :
d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(x) x.Cells(0).Value).Where(Function(g) g.Count() > 1).ToDictionary(Function(x) x.Key, Function(y) y.Count()).ToList().ForEach(Sub(s) d2.Rows.Add(s.Key, s.Value))
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز
او تشفير ويحتاج اعادة الفك.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
