09-12-20, 04:05 AM (آخر تعديل لهذه المشاركة : 09-12-20, 02:14 PM {2} بواسطة سعود.)
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله و بركاته
فقط للتسلية مع اكواد فيجوال بيسك
==================
@@@@@@@@@@@@@@
DuplicateFinder
@@@@@@@@@@@@@@
==================
نصيحة اذا كنت مبتديء ان تطبق الفكرة قبل الاطلاع على المثال فهذا يزيد من حماسك وبالتالي تجد عطاء غير مسبوق من ذهنك
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
ولإغناء الموضوع، يمكنك فعل ذلك بأسطر قليلة من خلال تقنية 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، تفضل هذه الأسطر فقط:
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
هذه التقنية رغم انكم ترونها سهلة الا انها مطولة .
اعان الله الجميع.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز او تشفير ويحتاج اعادة الفك.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز او تشفير ويحتاج اعادة الفك.
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز او تشفير ويحتاج اعادة الفك.
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
بارك الله فيك و جزاك عني كل خير
باذن الله ان يسر الله و سهل علي ساحاول فهمها قدر الامكان.
شكر الله لك و لكل من يقرأ هذا الكلام.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
و اياك اخي الكريم و كل من يقرا هذا الكلام.
هل تصدق ان قلت لك ان السطر اللذي كتبتَه أرى وكأنه لغز او تشفير ويحتاج اعادة الفك.
أنت محق للغاية، وهذا الكلام قلته أنا لنفسي يوماً، لكن بعد ذلك وجدت أن الأمر ليس كما أعتقد، فتقنية LINQ سريعة للغاية وسهلة وتختصر عليك عشرات الأسطر؛ لذا قمت بتعلمها والحمد لله.
وبناء على ذلك، قمت بشرح الكود السابق لك في الفيديو التالي، وضمن المرفقات ستجد السورس:
بارك الله فيكم هل من الممكن توجيهنا إلى الفيديوهات ال درستها أو طرقة تعلمنا أسرع وتختصر علينا المشوار وبارك الله فيكم
قمت أنا بالاستفادة من الدورات المنتشرة على اليوتيوب وأغلبها كانت بلغة #C، ولكن لم أواجه مشكلة؛ لأنني كنت أحول الكود للغة VB.NET من خلال بعض المواقع والأدوات المساعدة، كما استفدت من وثائق ومستندات مايكروسوفت، وكنت أطبق عملياً كل ما أتعلمه، وهذا جعلني أستفيد بشكل كبير.
تفضل المصادر: 1- وثائق ومستندات مايكروسوفت، وقد حملتها على شكل ملفات PDF، وهي بالمرفقات. 2- بنك الأكواد الجاهزة مع الشرح LINQ - Sample Queries، وهو بالمرفقات. 3- LINQ in C# سلسلة دروس وLINQ To SQL وLINQ To XML: ستجدها في قناة Ahmed Goda، تفضل الرابط:
قمت أنا بالاستفادة من الدورات المنتشرة على اليوتيوب وأغلبها كانت بلغة #C، ولكن لم أواجه مشكلة؛ لأنني كنت أحول الكود للغة VB.NET من خلال بعض المواقع والأدوات المساعدة، كما استفدت من وثائق ومستندات مايكروسوفت، وكنت أطبق عملياً كل ما أتعلمه، وهذا جعلني أستفيد بشكل كبير.
تفضل المصادر: 1- وثائق ومستندات مايكروسوفت، وقد حملتها على شكل ملفات PDF، وهي بالمرفقات. 2- بنك الأكواد الجاهزة مع الشرح LINQ - Sample Queries، وهو بالمرفقات. 3- LINQ in C# سلسلة دروس وLINQ To SQL وLINQ To XML: ستجدها في قناة Ahmed Goda، تفضل الرابط:
أسأل الله تعالى لك التوفيق، ولا تنسانا من دعواتك الطيبة
الله يرضى عليك و يبارك فيك
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
او تشفير ويحتاج اعادة الفك.
