تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
لا جديد [معرفة المكرر بشبيكة البيانات DataGridView No db]
#1
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله و بركاته
فقط للتسلية مع اكواد فيجوال بيسك
==================
@@@@@@@@@@@@@@
DuplicateFinder
@@@@@@@@@@@@@@


==================
نصيحة اذا كنت مبتديء ان تطبق الفكرة قبل الاطلاع على المثال فهذا يزيد من حماسك وبالتالي تجد عطاء غير مسبوق من ذهنك



الملفات المرفقة
.zip   DuplicateFinder.zip (الحجم : 24.02 ك ب / التحميلات : 64)
#2
وعليكم السلام ورحمة الله وبركاته
شكراً على التسلية الرائعة
ولإغناء الموضوع، يمكنك فعل ذلك بأسطر قليلة من خلال تقنية LINQ، تفضل هذه الأسطر فقط:


PHP كود :
       Dim query d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count())
 
       For Each item In query
            d2
.Rows.Add(item.Keyitem.Value)
 
       Next 
فاعلم أنه لا إله إلا الله
تم الشكر بواسطة: سعود , sendbad100 , ابراهيم ايبو , asemshahen5 , asemshahen5
#3
(21-12-20, 10:02 PM)السندبااد كتب :
وعليكم السلام ورحمة الله وبركاته
شكراً على التسلية الرائعة
ولإغناء الموضوع، يمكنك فعل ذلك بأسطر قليلة من خلال تقنية LINQ، تفضل هذه الأسطر فقط:


PHP كود :
       Dim query d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count())
 
       For Each item In query
            d2
.Rows.Add(item.Keyitem.Value)
 
       Next 

LINQ
هذه التقنية رغم انكم ترونها سهلة الا انها مطولة .
اعان الله الجميع.
#4
أكرمك الله أخي الحبيب سعود، وشكراً على جهودك الطيبة في نفع الآخرين، أسأل الله تعالى أن يجعلها في موازينك

للفائدة أيضاً: يمكن اختصار العملية بسطر واحد فقط من خلال تقنية LINQ:
PHP كود :
d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count()).ToList().ForEach(Sub(sd2.Rows.Add(s.Keys.Value)) 
فاعلم أنه لا إله إلا الله
تم الشكر بواسطة: سعود , ابراهيم ايبو , asemshahen5
#5
(06-01-21, 01:55 PM)السندبااد كتب :
أكرمك الله أخي الحبيب سعود، وشكراً على جهودك الطيبة في نفع الآخرين، أسأل الله تعالى أن يجعلها في موازينك

للفائدة أيضاً: يمكن اختصار العملية بسطر واحد فقط من خلال تقنية LINQ:
PHP كود :
d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count()).ToList().ForEach(Sub(sd2.Rows.Add(s.Keys.Value)) 

و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغزSmile او تشفير ويحتاج اعادة الفك.
#6
(07-01-21, 03:07 AM)سعود كتب :
(06-01-21, 01:55 PM)السندبااد كتب :
أكرمك الله أخي الحبيب سعود، وشكراً على جهودك الطيبة في نفع الآخرين، أسأل الله تعالى أن يجعلها في موازينك

للفائدة أيضاً: يمكن اختصار العملية بسطر واحد فقط من خلال تقنية LINQ:
PHP كود :
d1.Rows.Cast(Of DataGridViewRow)().GroupBy(Function(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count()).ToList().ForEach(Sub(sd2.Rows.Add(s.Keys.Value)) 

و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغزSmile او تشفير ويحتاج اعادة الفك.

أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.


وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:



الملفات المرفقة
.zip   DuplicateFinder.zip (الحجم : 49.75 ك ب / التحميلات : 18)
فاعلم أنه لا إله إلا الله
تم الشكر بواسطة: asemshahen5 , سعود , programmer_25
#7
(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(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count()).ToList().ForEach(Sub(sd2.Rows.Add(s.Keys.Value)) 

و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغزSmile او تشفير ويحتاج اعادة الفك.

أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.


وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:

بارك الله فيك و جزاك عني كل خير
باذن الله ان يسر الله و سهل علي ساحاول فهمها قدر الامكان.
شكر الله لك و لكل من يقرأ هذا الكلام.
تم الشكر بواسطة: السندبااد , programmer_25
#8
(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(xx.Cells(0).Value).Where(Function(gg.Count() > 1).ToDictionary(Function(xx.Key, Function(yy.Count()).ToList().ForEach(Sub(sd2.Rows.Add(s.Keys.Value)) 

و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغزSmile او تشفير ويحتاج اعادة الفك.

أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.


وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:

بارك الله فيكم هل من الممكن توجيهنا إلى الفيديوهات ال درستها أو طرقة تعلمنا أسرع وتختصر علينا المشوار وبارك الله فيكم
تم الشكر بواسطة: سعود , السندبااد
#9
Lightbulb 
أبشر أخي العزيز.
قمت أنا بالاستفادة من الدورات المنتشرة على اليوتيوب وأغلبها كانت بلغة #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 من قناة المبرمج العربي، تفضل الرابط:

أسأل الله تعالى لك التوفيق، ولا تنسانا من دعواتك الطيبة
Smile


الملفات المرفقة
.zip   مايكروسوفت.zip (الحجم : 3.43 م ب / التحميلات : 19)
.zip   LINQ - Sample Queries.zip (الحجم : 3.53 م ب / التحميلات : 17)
فاعلم أنه لا إله إلا الله
تم الشكر بواسطة: سعود
#10
(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 من قناة المبرمج العربي، تفضل الرابط:

أسأل الله تعالى لك التوفيق، ولا تنسانا من دعواتك الطيبة
Smile

الله يرضى عليك و يبارك فيك
تم الشكر بواسطة: السندبااد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عضو جديد وارجو المساعدة في DataGridView العواجي 2 92 09-04-21, 05:22 AM
آخر رد: العواجي
Photo [مشروع] ليس جديد لعبة ال 15 رقم asmarsou 0 103 06-04-21, 10:30 PM
آخر رد: asmarsou
  [مشروع] [ليس جديد ] برنامج بحث عن ملفات محددة في مجلدات عمومية معرفة سعود 1 332 29-03-21, 01:00 PM
آخر رد: EMAD MM
  [مثال] طريقة الاضافة او الحفظ داخل قاعدة البيانات SQL alims 0 116 25-03-21, 06:16 AM
آخر رد: alims
  وداعا ADO.net ووداعا للعلاقات في قواعد البيانات viv 6 1,670 13-03-21, 07:47 AM
آخر رد: محمد فوزى محمد
  [مثال] برنامج لحرق مختلف البيانات على قرص BM Data CD Burner asmarsou 0 204 24-02-21, 12:33 PM
آخر رد: asmarsou
  [مثال] trackbar من نوع جديد asmarsou 2 303 22-02-21, 10:50 AM
آخر رد: asmarsou
  [مشروع] مثال ليس جديد و لكنه فريد asmarsou 2 501 12-02-21, 06:08 AM
آخر رد: asmarsou
  [مشروع] [vb.net] حذف المكرر من الحروف سعود 2 261 24-01-21, 08:13 PM
آخر رد: سعود
  [مشروع] [ليس جديد] الاضافة والتعديل والحذف والبحث ضمن MYsettings سعود 1 340 21-01-21, 06:21 AM
آخر رد: سعود

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


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