+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم امثلة ومشاريع VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=188)
+--- الموضوع : لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] (/showthread.php?tid=37148)
لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - سعود - 09-12-20
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله و بركاته
فقط للتسلية مع اكواد فيجوال بيسك
==================
@@@@@@@@@@@@@@
DuplicateFinder
@@@@@@@@@@@@@@
==================
نصيحة اذا كنت مبتديء ان تطبق الفكرة قبل الاطلاع على المثال فهذا يزيد من حماسك وبالتالي تجد عطاء غير مسبوق من ذهنك
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - السندبااد - 21-12-20
وعليكم السلام ورحمة الله وبركاته
شكراً على التسلية الرائعة
ولإغناء الموضوع، يمكنك فعل ذلك بأسطر قليلة من خلال تقنية LINQ، تفضل هذه الأسطر فقط:
PHP كود :
Dim query = 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())
For Each item In query
d2.Rows.Add(item.Key, item.Value)
Next
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - سعود - 25-12-20
(21-12-20, 10:02 PM)السندبااد كتب :وعليكم السلام ورحمة الله وبركاتهشكراً على التسلية الرائعةولإغناء الموضوع، يمكنك فعل ذلك بأسطر قليلة من خلال تقنية LINQ، تفضل هذه الأسطر فقط:
PHP كود :
Dim query = 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())
For Each item In query
d2.Rows.Add(item.Key, item.Value)
Next
LINQ
هذه التقنية رغم انكم ترونها سهلة الا انها مطولة .
اعان الله الجميع.
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - السندبااد - 06-01-21
أكرمك الله أخي الحبيب سعود، وشكراً على جهودك الطيبة في نفع الآخرين، أسأل الله تعالى أن يجعلها في موازينك
للفائدة أيضاً: يمكن اختصار العملية بسطر واحد فقط من خلال تقنية 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))
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - سعود - 07-01-21
(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))
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز
او تشفير ويحتاج اعادة الفك.
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - السندبااد - 07-01-21
(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))
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - سعود - 07-01-21
(07-01-21, 11:26 PM)السندبااد كتب :(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))
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
بارك الله فيك و جزاك عني كل خير
باذن الله ان يسر الله و سهل علي ساحاول فهمها قدر الامكان.
شكر الله لك و لكل من يقرأ هذا الكلام.
RE: لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db] - programmer_25 - 08-01-21
(07-01-21, 11:26 PM)السندبااد كتب :بارك الله فيكم هل من الممكن توجيهنا إلى الفيديوهات ال درستها أو طرقة تعلمنا أسرع وتختصر علينا المشوار وبارك الله فيكم(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))
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
مصادر تعلم تقنية LINQ - السندبااد - 08-01-21
أبشر أخي العزيز.
قمت أنا بالاستفادة من الدورات المنتشرة على اليوتيوب وأغلبها كانت بلغة #C، ولكن لم أواجه مشكلة؛ لأنني كنت أحول الكود للغة VB.NET من خلال بعض المواقع والأدوات المساعدة، كما استفدت من وثائق ومستندات مايكروسوفت، وكنت أطبق عملياً كل ما أتعلمه، وهذا جعلني أستفيد بشكل كبير.تفضل المصادر:
1- وثائق ومستندات مايكروسوفت، وقد حملتها على شكل ملفات PDF، وهي بالمرفقات.
2- بنك الأكواد الجاهزة مع الشرح LINQ - Sample Queries، وهو بالمرفقات.
3- LINQ in C# سلسلة دروس وLINQ To SQL وLINQ To XML: ستجدها في قناة Ahmed Goda، تفضل الرابط:
4- سلسلة Linq من kudvenkat.arabic، وتضم (LINQ to SQL in arabic - LINQ to XML in arabic - LINQ tutorial in arabic)، تفضل الرابط:
5- كورس Linq To Sql من قناة المبرمج العربي، تفضل الرابط:
أسأل الله تعالى لك التوفيق، ولا تنسانا من دعواتك الطيبة
RE: مصادر تعلم تقنية LINQ - سعود - 08-01-21
(08-01-21, 12:55 PM)السندبااد كتب :أبشر أخي العزيز.قمت أنا بالاستفادة من الدورات المنتشرة على اليوتيوب وأغلبها كانت بلغة #C، ولكن لم أواجه مشكلة؛ لأنني كنت أحول الكود للغة VB.NET من خلال بعض المواقع والأدوات المساعدة، كما استفدت من وثائق ومستندات مايكروسوفت، وكنت أطبق عملياً كل ما أتعلمه، وهذا جعلني أستفيد بشكل كبير.
تفضل المصادر:
1- وثائق ومستندات مايكروسوفت، وقد حملتها على شكل ملفات PDF، وهي بالمرفقات.
2- بنك الأكواد الجاهزة مع الشرح LINQ - Sample Queries، وهو بالمرفقات.
3- LINQ in C# سلسلة دروس وLINQ To SQL وLINQ To XML: ستجدها في قناة Ahmed Goda، تفضل الرابط:
4- سلسلة Linq من kudvenkat.arabic، وتضم (LINQ to SQL in arabic - LINQ to XML in arabic - LINQ tutorial in arabic)، تفضل الرابط:
5- كورس Linq To Sql من قناة المبرمج العربي، تفضل الرابط:
أسأل الله تعالى لك التوفيق، ولا تنسانا من دعواتك الطيبة
الله يرضى عليك و يبارك فيك