منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ماهو الكود الصحيح و العملي لهذا - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ماهو الكود الصحيح و العملي لهذا (/showthread.php?tid=29555)

الصفحات: 1 2


RE: ماهو الكود الصحيح و العملي لهذا - elgokr - 11-05-19

وعليكم السلام ورحمة الله وبركاته

أولاً: بخصوص
(05-05-19, 04:58 PM)kador كتب :
أخي شكرا لاجابتك

الغاية من الكود هي اعارة كتاب للطالب و عند مرور 3 ايام  ولم يتم ارجاع الكتاب يقوم البرنامج بالتنبيه

فهنا عند عمل ما تريده
يمكنك اضافة عمود خاص باليوم ليحدد هنا اليوم التى تم اخذ الكتابه فيه
وكذلك عمود اخر لتحديد عدد الايام المطلوب استرجاع الكتاب به 

ثم يتم التالى
فمثلاً اذا كان تم طلبه يوم الاحد / الاثنين / الثلاثاء
فيتم كتابة اسم اليوم فى العمود الموضح بالاعلى
ويتم كتابة رقم 3 فى العمود الثاني اى عدد ايام استرجاع الكتاب
مفثلاً تم اخد الكتاب يوم الثلاء +3 ايام يعنى الاسترجاع يوم الخميس
مع احتساب اليوم الاول ( الصلاثاء ) من عدد الايام

طيب لو تم اخذ الكتاب يوم الاربعاء / الخميس
سيكتب فى العمود الاول اسم وبالعمود الاخر 5 بدلاً من 3
بحيث اذا تم اخذ الكتاب يوم الخميس سيتم ارجاع الكتاب يوم الاثنين

الطريقة المستفادة من وجود كلا من العمودين
وهو توضيح اليوم لطلب الكتاب والاخر للمدة المتاحة له لاسترجاع الكتاب
وطبعاً لديك انت عمود خاص التاريخ فهنا سيتم اضافة عدد الايام اذا كان 3 أو 5
ليتم تحديد التاريخ تلقائي ليوم اعادة الكتاب

وبكدة تكون سهلت على نفسك الامر


ثانياً : بخصوص الصورة والتعديل
(06-05-19, 12:17 PM)kador كتب :
أخي ابراهيم اشكرك من كل قلبي على اجابتك و تعبك معي الله يجازيك كل خير

لقد اطلعت على مثالك جيدا .......لكن لو لاحظت في طلبي اني كنت اريد حساب فرق التاريخ من خلال الدا جريت فيو

و قد ارفقت لك صورة تبين ما اريده 

اريد تغيير القيم التي باللون الأحمر الى التي باللون الأخضر


أشكرك كثيرا سيدي


فقط استبدل كلا من السطرين ليكون
كود :
       Firstdate = CDate(DataGridView1(7, DataGridView1.CurrentRow.Index).Value)
       Seconddate = CDate(DataGridView1(6, DataGridView1.CurrentRow.Index).Value)

بهذا الشكل الكود سيعمل فى زر
بحيث عند الوقوف على سطر معين فى الداتا جريد

وللعمل على جميع الداتا جريد تلقائي
فقط ادخل الكود كاملاً فى حلقة For واستبدل
كود :
DataGridView1.CurrentRow.Index

فقط بـ 
كود :
i

خاصة حلقة For

تحياتى لك
وتمنياتى لك التوفيق



RE: ماهو الكود الصحيح و العملي لهذا - kador - 12-05-19

                                                      شكرا لك اخي elgokr

الفكرة حقا تبدوا منطقية وسهلة سأقوم بالدراسة و التنفيذ و التريث لامكان ايجاد ما هو اجدر


بارك الله فيك


RE: ماهو الكود الصحيح و العملي لهذا - elgokr - 12-05-19

الشكر لله والحمد لله
والحمد لله على كل حال

دائماً كونك مبرمج يجب ان تنظر لما يكون الاسهل
لما يعطي من المطلوب دون الحاجة لتعقيد
فى استخدام شرط التحقق IF متعدد لتصل ما تريده
وقد يسبب فى خلل وتقوم بتصحيح مرة واثنين حتى تصل لما هو مطلوب بالنهاية

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

تحياتى لك
وتمنياتى لك التوفيق