31-05-20, 12:28 AM
31-05-20, 12:28 AM
31-05-20, 12:46 AM
السلام عليكم اخي الكريم
تابع هذا الرابط وفي الرد الاخير يوجد مثال فيه الكثير مما تتساءل عنه
http://vb4arb.com/vb/showthread.php?tid=34944
تابع هذا الرابط وفي الرد الاخير يوجد مثال فيه الكثير مما تتساءل عنه
http://vb4arb.com/vb/showthread.php?tid=34944
31-05-20, 01:37 AM
اشكرك اخي الكريم . على الرد ولكن الملف لم يعمل لدى
ان امكن تكتب لي الكود المطلوب اكون لك شاكر
ان امكن تكتب لي الكود المطلوب اكون لك شاكر
31-05-20, 02:32 AM
السلام عليكم اخي الكريم
اليك جملتين فور الاولى ستتحقق من ان التاريخ اقل من التاريخ الحالي بأكثر من 60 يوم عندها سيتلون الصف باللون الاحمر
والثانية ستتحقق من ان التاريخ مساوي التاريخ الحالي ناقص 55 يوم سيتلون الصف باللون الاصفر
لكن انتبه اذا كان في الداتا غرايد صف اخير فارغ ستكتب هذا السطر
اليك جملتين فور الاولى ستتحقق من ان التاريخ اقل من التاريخ الحالي بأكثر من 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 - 231-05-20, 02:41 AM
مشكوووور اخي الكريم على مساعدتك ولك فائق ودي
31-05-20, 02:44 AM
الحمد لله والشكر لله
ولك ايضا اخي العطر الرايق