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

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

يعني لو مثلا عند داتاقريد فيو وأريد أن أعرف مثلا كم مرة تتكرر العدد 10   ومعرفة كم تكرر الرقم  9   ....... وهكذا
شاكرا لكم حسن تعاونكم

رمضان مبارك
السلام عليكم ورحمة الله وبركاته
تفضل اخي الكريم هذا مثال فيه عدد من السجلات وفيه حقل رقمي
عند البحث عن رقم سيعطيك عدد السجلات التي تحتوي على ذلك الرقم
أخي إبراهيم .. كيف سيكون شكل الكود  لو الحقل الذي نبحث فيه نصي و ليس رقمي ..
جربت بهذا التغيير بالكود و بنوعية الحقل بالجدول و لم تضبط الحكاية
كود :
Dim Query As String = "select Count(*) From Person Where CV_Numer='" & Txt_Search.Text & "'"

تحياتي
السلام عليكم اخي عبد العزيز

اليك هذا الكود يبحث داخل حقل الاسم
كود :
Dim da As New OleDbDataAdapter
   Dim dt As New DataTable
   '-----------Public Sub SelectWhere-----------
   Public Sub SelectWhere_Person()
       Try
           dt.Clear()
           da = New oledbDataAdapter("select Person.CVID,Person.CVName,Person.CV_Numer from Person Where CVName like '%" & Txt_Search.Text & "%'", con)
           da.Fill(dt)
           dgv_table.DataSource = dt
           Lbl_count.Text = 0
           For i As Integer = 0 To dgv_table.Rows.Count - 1
               If dgv_table.Rows(i).Cells("CVName").Value.ToString().Trim() = Txt_Search.Text.Trim() Then
                   Lbl_count.Text += 1
               End If
           Next
       Catch ex As Exception

       End Try
     
   End Sub
وهذا البوتن الخاص بالبحث
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       SelectWhere_Person()
     
   End Sub