تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تغيير لون صف في DataGridView
#1
ارجوا مساعدتي قمت بعمل برنامج يعتمد على التواريخ اريد كود يقوم بتغيير خلفيه كل السجلات في DataGridView التي  تبقى لها مثلا 20 يوم الى اللون الاحمر

وشكرا لكم
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

هذا كود تغيير الالوان عليكى وضع الشرط المناسب لتغيير اللون
اتمنى ان اكون قد افدتك
كود :
For i = 0 To DataGridView1.Rows.Count - 1
If DataGridView1.Rows(i).Cells(0).Value = 6 Then
               DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
           End If
Next
اذا كنتى لا تعرفين الشرط المناسب اخبرينى هل تحتفظين بالبيانات على هيئة تاريخ ام ماذا لكى استطيع ان اضع لكى الشرط المناسب
الرد }}}}
تم الشكر بواسطة: امل حسن
#3
شكرا اخي على ردك
لا اعرف كيف الشرط واذا امكن كيف عملها بالطريقتين هيئه نص وهئيه تاريخ

للتوضيح اكتر لما اريد
انا عندي برنامج يعتمد على قاعدة بيانات اكسس حيث يظهر البيانات في DataGridView اريد عندما يتبقى لاتنتهاء التاريخ مثلا ايام معينه ان يتغير لون الصف في DataGridView الى لون احمر
الرد }}}}
تم الشكر بواسطة:
#4
جرب هذا الكود
PHP كود :
For As Integer 0 To Datagridview1.Rows.Count 1
        For ColNo 
As Integer 4 To 7
            If Datagridview1
.Rows(i).Cells(ColNo).Value 20 Then

                Datagridview1
.Rows(i).Cells(ColNo).Style.BackColor Color.Red
            End 
If
 
       Next
    Next 
الرد }}}}
تم الشكر بواسطة: امل حسن
#5
اين اضع الكود في اي حدث؟؟

واذا يجب تغيير اي شي بالكود ليناسب مع برنامج فما هو
الرد }}}}
تم الشكر بواسطة:
#6
اثناء تحميل الداتا جريد بالبيانات
الرد }}}}
تم الشكر بواسطة: امل حسن
#7
قمت بارفاق مثال على البرنامج ارجو التعديل عليه لكي تتضح اليه عمل الكود 
وكما اسلفت سابقه الاعتماد على التاريخ


الملفات المرفقة
.zip   Example.zip (الحجم : 1.05 م ب / التحميلات : 103)
الرد }}}}
تم الشكر بواسطة:
#8
PHP كود :
 Private Sub Loadgrid()

 
       'اسناد جمله الاستعلام ومصدر الاتصال  الي كائن الامر 
        Cmd.Connection = Cn
        Cmd.CommandType = CommandType.Text ' 
لو لم تكتب هذا السطر فهي الافتراضي 
        Cmd
.CommandText "SELECT * FROM employees order by Emp_code "

 
       Cn.Open() ' فتح الاتصال 
        '
حذف البيانات القديمه من الداتا تيبل 
        dt
.Clear()
 
       ' تحميل السجلات العائده من الاستعلام في الداتا تيبل
        dt.Load(Cmd.ExecuteReader)
        ' 
ربط مصدر البيانات للدات جريد
        DataGridView1
.DataSource dt


        For i 
0 To DataGridView1.Rows.Count 1
            If CDate
(DataGridView1.Rows(i).Cells(2).Value) <= Now.AddDays(20Then
                DataGridView1
.Rows(i).DefaultCellStyle.BackColor Color.Red
                DataGridView1
.Rows(i).DefaultCellStyle.SelectionBackColor Color.Red
            End 
If
 
       Next


        Cn
.Close() ' غلق الاتصال 


        ' 
كود التحكم في عرض الخلايا 
        DataGridView1
.Columns(0).Width 150
        DataGridView1
.Columns(2).Width 150


        
' الكود التالي لتوسيط الأعمدة
        DataGridView1.Columns(0).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        DataGridView1.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        DataGridView1.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter



        '
تحديد السطر بالكامل وليس خليه واحده
        DataGridView1
.SelectionMode DataGridViewSelectionMode.FullRowSelect

        
' تغير اسامي العناوين للهيدر
        DataGridView1.Columns(0).HeaderText = "الكود"
        DataGridView1.Columns(1).HeaderText = "الاسم"
        DataGridView1.Columns(2).HeaderText = "التاريخ"
        ' 
توسيط الهيدر 
        DataGridView1
.ColumnHeadersDefaultCellStyle.Alignment DataGridViewContentAlignment.MiddleCenter

        
' كود جعل ثاني خليه  'الاسم' تأخذ باقي عرض الداتا جريد
        DataGridView1.Columns(1).AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
        ' 
تلوين سطر وسطر 
        DataGridView1
.AlternatingRowsDefaultCellStyle.BackColor Color.LightGray

        rowSelection
()
 
   End Sub 
الرد }}}}
تم الشكر بواسطة: امل حسن
#9
تفضلي أختي العزيزة
لقد تم معالجة المشروع بناء لطلبك

المشروع بعد التعديل :
.rar   khodor1985 - Example.rar (الحجم : 1 م ب / التحميلات : 182)

أتمنى لك التوفيق
عن مولا نا علي ابن أبي طالب عليه السلام :
إضرب بعض الرأي ببعض يتولد منه الصواب.
الرد }}}}
تم الشكر بواسطة: امل حسن
#10
اشكركم جميعا على المساعده
وهذا ما اريده
لدي استفسار لو ممكن شرح الكود
واذا اريد نقل الكود على مشروع اخر ما الذي يجب تغييره في الكود ليتناسب مع المشروع الجديد
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] اضهار فورم عند الضغط على DataGridView جاسم عوط 2 50 أمس, 03:29 PM
آخر رد: Amir_alzubidy
  اضافة او تغيير على مشروع اخر gawhar 0 12 أمس, 03:03 PM
آخر رد: gawhar
  [سؤال] البحث عن الخانات التي تحتوي على قيم DataGridView fredo 6 131 01-12-17, 02:55 PM
آخر رد: fredo
  اريد كود يسمح با التعديل والكتابة علي اخر سطر من DataGridView دون باقي السطور ahmedbezia 4 79 28-11-17, 04:43 PM
آخر رد: ahmedbezia
  تغيير المسار ملف صوتي العيدروس 12 136 25-11-17, 04:01 AM
آخر رد: العيدروس
  نقل البيانات من DataGridView الي textbox ahmedbezia 16 217 18-11-17, 08:36 PM
آخر رد: Rabeea Qbaha
  اريد كود للبحث التلقائي في DataGridView ahmedbezia 15 366 16-11-17, 07:00 PM
آخر رد: ahmedbezia
  المساعدة في دمج المراسلات ( mail merge ) على ملف وورد باستخدام datagridview جيولوجي مبتدئ 3 109 12-11-17, 10:06 AM
آخر رد: جيولوجي مبتدئ
  المساعدة في تضبيط عرض Width اعمدة ال DataGridView khaled12345 2 121 06-11-17, 07:58 PM
آخر رد: khaled12345
  [VB.NET] سؤال : تحديد عدد الاسطر في DataGridView dubai.eig 2 83 06-11-17, 02:38 PM
آخر رد: dubai.eig

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم