منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اريد عمل تذكير بميعاد
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
اريد عمل تذكير بميعاد قبل موصوله بثلاثة ايام موجود من ضمن مواعيد كثيرة في DataGridView
السلام عليكم ورحمة الله وبركاته
تختلف طريقة الاعلام عن الموعد حسب البرنامج او طريقة عرض الموعد
فمثلا يمكنك انشاء ليست بوكس سيتم اضافة اسماء المواعيد التي يحين موعدها بعد 3 ايام عندا يحمل الفورم ويجلب البيانات
او يمكننا جعل لون الكتابة لذلك السجل في الداتا غرايد بلو احمر مثلا 
هنا جعلت لك الكود يعرض رسالة
الامر يعود اليك اما الكود فهو كالتالي
 في حدث FormLoad
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For i As Integer = 0 To DataGridView1.Rows.Count - 1
           If DataGridView1.Rows(i).Cells("تاريخ الموعد").Value = Now.AddDays(3) Then
               MsgBox("باقي 3 ايام على الموعد" & DataGridView1.Rows(i).Cells("اسم الموعد").Value.ToString())
           End If
       Next

   End Sub
(17-04-20, 02:32 AM)ابراهيم ايبو كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
تختلف طريقة الاعلام عن الموعد حسب البرنامج او طريقة عرض الموعد
فمثلا يمكنك انشاء ليست بوكس سيتم اضافة اسماء المواعيد التي يحين موعدها بعد 3 ايام عندا يحمل الفورم ويجلب البيانات
او يمكننا جعل لون الكتابة لذلك السجل في الداتا غرايد بلو احمر مثلا 
هنا جعلت لك الكود يعرض رسالة
الامر يعود اليك اما الكود فهو كالتالي
 في حدث FormLoad
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For i As Integer = 0 To DataGridView1.Rows.Count - 1
           If DataGridView1.Rows(i).Cells("تاريخ الموعد").Value = Now.AddDays(3) Then
               MsgBox("باقي 3 ايام على الموعد" & DataGridView1.Rows(i).Cells("اسم الموعد").Value.ToString())
           End If
       Next

   End Sub
وعليكم السلام
وشكرا جدا لعرض الكود بهذا الشكل ولكن لي سؤال به ما هو القيم التي يجيب أن اغيرها بالمعلومات التي لدي لكي يعمل الكود
بمعني أنه عند إضافة الكود الخاص بك في البرنامج الخاص بي يأتي بخطأ
السلام عليكم اخي الكريم 
هذا الكود بشكل عام افتراضي مع داتا غرايد بحقل تاريخ الموعد وهو من نوع تاريخ قصير dd/MM/yyyy نضع فيه تاريخ الموعد
والحقل الاخر اسم الموعد وهذا الحقل يحتوي عل تسمية تعبر عن الموعد نوع نصي نستخدمه حسب رغبتنا
واستخدام الكود يعود الى طريقة اظهار التنبيه لديك
السلام عليكم 
اخي الكريم هذا مثال فيه سجلات لمواد غذائية  لها تاريخ صلاحية
اعتبر تاريخ انتهاء الصلاحية عبارة عن موعد افهم الاكواد وخذ مايناسبك من الاكواد في مشروعك
فعملية الموعد هي نفسها انتهاء سلعة