المشاركات : 192
المواضيع 59
الإنتساب : Aug 2018
السمعة :
6
الشكر: 268
تم شكره 217 مرات في 122 مشاركات
10-12-18, 10:54 AM
(آخر تعديل لهذه المشاركة : 10-12-18, 10:55 AM {2} بواسطة Hazem1.)
بسم الله الرحمن الرحيم
--------------------------
إخواني الكرام أود تلوين صف كامل في الداتا جريدفيو باللون الأحمر، عندما تكون القيمة Null في العمود الثالث
حاولت استخدام هذا الكود ولكن لم يكن صحيحا، فما الحل بارك الله فيكم:
PHP كود :
Public Sub color_Exp()
For i As Integer = 0 To Me.DataGridView1.Rows.Count - 1
If Me.DataGridView1.Rows(i).Cells("Exp").Value = "null" Then
Me.DataGridView1.Rows(i).Cells("Exp").Style.BackColor = Color.Red
End If
Next
End Sub
عن أبي هريرة - رضي الله عنه - قال: قال رسول الله - صلى الله عليه وسلم -: ((كلمتان خفيفتان على اللسان، ثقيلتان في الميزان، حبيبتان إلى الرحمن: سبحان الله وبحمده، سبحان الله العظيم))؛ متفق عليه.
المشاركات : 192
المواضيع 59
الإنتساب : Aug 2018
السمعة :
6
الشكر: 268
تم شكره 217 مرات في 122 مشاركات
10-12-18, 01:08 PM
(آخر تعديل لهذه المشاركة : 10-12-18, 01:12 PM {2} بواسطة Hazem1.)
(10-12-18, 12:00 PM)rmnr كتب :
كود :
If isnothing(Me.DataGridView1.Rows(i).Cells("Exp").Value) Then
جزاك الله خيراً أخي على مجهودك ولكن الكود لم يعمل، القيمة هي : Null أقوم بكتابة حروفها بيدي يعني مثلاً لو أن قيمة عمر الطلاب 22 - 23 - 24 سنة، فأنا أردت أن يقوم بتحديد كل الصفوف التي تحتوي على الخلايا التي تشمل 22 فقط ويجعلها باللون الأحمر مثلاً.
عن أبي هريرة - رضي الله عنه - قال: قال رسول الله - صلى الله عليه وسلم -: ((كلمتان خفيفتان على اللسان، ثقيلتان في الميزان، حبيبتان إلى الرحمن: سبحان الله وبحمده، سبحان الله العظيم))؛ متفق عليه.
المشاركات : 192
المواضيع 59
الإنتساب : Aug 2018
السمعة :
6
الشكر: 268
تم شكره 217 مرات في 122 مشاركات
12-12-18, 06:09 PM
(آخر تعديل لهذه المشاركة : 12-12-18, 07:28 PM {2} بواسطة Hazem1.)
(12-12-18, 04:48 PM)ابراهيم ايبو كتب : اخي حازم السلام عليكم
جربت الكود في حدث form_load وهو شغال تماما وهذه صورة من البرنامج والكود
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
FillData()
Prd.Dgv_EnglishHeader(dgv_table)
'===============
For i As Integer = 0 To Me.dgv_table.Rows.Count - 1
If Me.dgv_table.Rows(i).Cells("adress").Value = "null" Then
Me.dgv_table.Rows(i).Cells("adress").Style.BackColor = Color.Red
End If
Next
'===================
End Sub
جزاك الله خيراً أخي الحبيب
ابراهيم ايبو، كان الخطأ مني في وضع اسم العمود فلابد من وضع اسم العمود المذكور في جدول الداتاجريدفيو
لي استفسار يسير : هل يُمكن تلوين الصف كله بدلاً من الخلية الواحدة؟
عن أبي هريرة - رضي الله عنه - قال: قال رسول الله - صلى الله عليه وسلم -: ((كلمتان خفيفتان على اللسان، ثقيلتان في الميزان، حبيبتان إلى الرحمن: سبحان الله وبحمده، سبحان الله العظيم))؛ متفق عليه.
المشاركات : 192
المواضيع 59
الإنتساب : Aug 2018
السمعة :
6
الشكر: 268
تم شكره 217 مرات في 122 مشاركات
(12-12-18, 07:54 PM)ابراهيم ايبو كتب : السلام عليكم اخي حازم
لاأعرف كود خاص بتلوبن الصف بأكمله ولكن هناك دائما حلول
فلو افترضنا انك تريد الذهاب الى المدينة وانت في قرية ولايوجد سيارة تستقلها فهل تلغي الذهاب؟ بالطبع لا سوف تستخدم اي وسيلة ركوب حتى ولو كانت
دابة لتصل الى المدينة وفي حالتنا هذه وغيرها اذا لم يكن هناك كود معين الجأ الى التحايل بالبرمجة ولو اصبح الكود طويل نسبيا واستخدمه الى ان تتوصل الى
كود مختصر في اوقات لاحقة وقد قمت بكتابة الكود على النحو التالي وانظر كم عمود عندك في الداتا غرايد واعمل تلوبن لكل خلية بنفس الصف لكل عمود.. المهم ان تصل الى غايتك وهذا منهج في التفكبر البرمجي اتمنى ان تسير فيه فهو سيجعل تفكيرك اوسع دمت بخير
كود :
For i As Integer = 0 To Me.dgv_table.Rows.Count - 1
If Me.dgv_table.Rows(i).Cells("adress").Value = "homs" Then
Me.dgv_table.Rows(i).Cells("adress").Style.BackColor = Color.Red
Me.dgv_table.Rows(i).Cells(0).Style.BackColor = Color.Red
Me.dgv_table.Rows(i).Cells(1).Style.BackColor = Color.Red
Me.dgv_table.Rows(i).Cells(2).Style.BackColor = Color.Red
Me.dgv_table.Rows(i).Cells(3).Style.BackColor = Color.Red
End If
Next
وهذه صورة لتحديد الصف
جزاك الله خيراً أخي الحبيب [b][b]ابراهيم ايبو[/b]، نصيحتك طيبة طيَّب الله بكل خير، الكود أصبح يعمل بشكل سليم، سلمك الله من كل سوء وأكرمك بالجنة.[/b]
عن أبي هريرة - رضي الله عنه - قال: قال رسول الله - صلى الله عليه وسلم -: ((كلمتان خفيفتان على اللسان، ثقيلتان في الميزان، حبيبتان إلى الرحمن: سبحان الله وبحمده، سبحان الله العظيم))؛ متفق عليه.