تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] استفسار عن دالة لحساب الارقام المتشابهة
#5
(27-09-21, 03:46 PM)ابو انس كتب : وعليكم السلام
قم بانشاء داتا جريد فيو ولنسمه dgv قم باضافة عمود واحد على الاقل ولنسمه مثلا num
قم بانشاء lable عدد 2
كود :
   Private Sub dgv_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgv.CellClick
       Dim a As Integer = dgv.CurrentRow.Index
       Label1.Text = dgv.Rows(a).Cells("num").Value

       Dim rep As Integer
       For i As Integer = 0 To dgv.Rows.Count - 1
           If dgv.Rows(i).Cells("num").Value = Label1.Text Then
               rep += 1
           End If
       Next
       Label2.Text = rep
   End Sub


شكرا لردك لكن ما احتاج الى CellClick  , الفكرة انا اريد فرز ارقام معينة في الجدول يعني تواريخ متشابهة عملت هذا الكود


كود :
For i As Integer = 0 To DgvOne.Rows.Count - 1
           Dim str As String = DgvOne(3, DgvOne.Rows(i).Index).Value
         
           Dim Spl() As String = Split(str, "/")

           Dim Num As String = "2018"

           If Spl(2) = Num Then
               RichTextBox1.Text += Spl(2) & vbNewLine

           Else

           End If

     
 Next

المشكلة الان كيف احسب العدد المفروز ؟  Sad
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: استفسار عن دالة لحساب الارقام المتشابهة - بواسطة نيمو - 27-09-21, 04:20 PM


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


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