تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تحديد الاسماء المكرره
#1
السلام عليكم ورحمة الله وبركاته

الرجاء المساعده في كيفية تحديد ( تظليل ) الاسماء المكرره في عمود الاسماء في الداتا قريد فيو

للعلم استخدمت الكود في الاسفل ولم تنفع الطريقه

يرجى المساعده


كود :
Sub HighlightDupes(ByRef dgv As DataGridView, ByVal col_id As Integer)

       Dim dgvCol As DataGridViewColumn = DataGridView1.Columns("colname")
       dgv.Sort(dgvCol, System.ComponentModel.ListSortDirection.Ascending)

       Dim numRows As Integer = dgv.Rows.Count() ''// or dgv.SelectedRows.Count() for the selected rows
       Dim flagFirstRow As Boolean = True
       Dim tempStr As String = ""

       For Each RW As DataGridViewRow In dgv.Rows ''// or dgv.SelectedRows for the selected rows
           On Error Resume Next
           If Not (flagFirstRow) Then
               If (RW.Cells("colname").Value.ToString() = tempStr) Then

                   ''// RW.Cells(col_id).Style.BackColor = Color.LightGreen
                   ''// RW.Cells(col_id).Style.BackColor = Color.White

                   RW.Cells("colname").Selected = True
                   dgv.CurrentCell.Style.BackColor = Color.LightGreen
                   dgv.CurrentCell.Style.ForeColor = Color.White

                   '  MsgBox("Dupe found: " & tempStr)

               End If

           End If
           tempStr = RW.Cells("colname").Value.ToString()
           flagFirstRow = False
       Next




   End Sub
الرد
تم الشكر بواسطة:
#2


خذ من المشروع الفكرة
الرد
#3
تسلم اخي العزيز
الرد
تم الشكر بواسطة:



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


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