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

نسخة كاملة : استفسار بسيط ممكن المساعدة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله 
كل عام وانتم بخير 

يوجد لدى قاعدة بيانات بها اسماء وتواريخ 
المطلوب تلوين الصف باللون الاحمر في حال مرور اكثر من 60 يوم  او اكثر من التاريخ الموجود بالقاعدة 
 واللون الاصفر قبل 60 يوم بـ 5 ايام  . 


ولكم جزيل الشكر 

مثال : 
السلام عليكم اخي الكريم
تابع هذا الرابط وفي الرد الاخير يوجد مثال فيه الكثير مما تتساءل عنه
http://vb4arb.com/vb/showthread.php?tid=34944
اشكرك اخي الكريم . على الرد ولكن الملف لم يعمل لدى
ان امكن تكتب لي الكود المطلوب اكون لك شاكر
السلام عليكم اخي الكريم
اليك جملتين فور الاولى ستتحقق من ان التاريخ اقل من التاريخ الحالي بأكثر من 60 يوم عندها سيتلون الصف باللون الاحمر
والثانية ستتحقق من ان التاريخ مساوي   التاريخ الحالي  ناقص 55 يوم سيتلون الصف باللون الاصفر
كود :
  Dim kk As Date = Now.ToString("dd/MM/yyyy")
       For i As Integer = 0 To DataGridView1.Rows.Count - 1
           If DataGridView1.Rows(i).Cells(3).Value < kk.AddDays(-60) Then
               DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
           End If
 Next
  '========================         
 For i As Integer = 0 To DataGridView1.Rows.Count - 1
           If DataGridView1.Rows(i).Cells(3).Value = kk.AddDays(-55) Then
               DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Yellow
           End If
       Next
لكن انتبه اذا كان في الداتا غرايد صف اخير فارغ  ستكتب هذا السطر 
كود :
For i As Integer = 0 To DataGridView1.Rows.Count - 2
مشكوووور اخي الكريم على مساعدتك ولك فائق ودي
الحمد لله والشكر لله
ولك ايضا اخي العطر الرايق