تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البحث مع داتا قرايد فيو مهم جدا
#1
استعملت هذا الكود للبحث داخل داتا قرايد فيو بدون الفرز من الجداول  
 '  Dim irowindex As Integer
        'تم الاعلان عنه في القسم العام
        If irowindex > (DataGridView1.Rows.Count - 1) Then
            irowindex = 0
        End If

        Dim srch As String
      
        srch = TextBox12.Text
        DGV_units.ClearSelection()

        For i As Integer = irowindex To DGV_units.Rows.Count - 1
            If DGV_units.Rows(i).Cells(2).Value IsNot Nothing Then
                If DGV_units.Rows(i).Cells(2).Value.ToString.ToUpper.StartsWith(srch.ToUpper) Then
                    DGV_units.Rows(i).Selected = True
                    DGV_units.RowsDefaultCellStyle.SelectionBackColor = Color.Blue
                    irowindex = i
                    DGV_units.FirstDisplayedScrollingRowIndex = (i)
                    Exit For
                End If
            End If
        Next

ما أريده الان ان يبحث البرنامج عن النتيجة التالية بالضغط على نفس الزر  , هل هذا ممكن   , وشكرا لكم مقدما
الرد
تم الشكر بواسطة:
#2
لم يعمل البحث فقط لمرة واحدة  
المطلوب هو عندي فهرس اصناف  مثلا جوال 1 , جوال 2 , جوال  3 وهكذا  
الضغط الاول سيقف على اول نتيجة وفي الضغطة الثانية التالي لها وهكذا  ...... 
انا شفت الفكرة في برنامج معمول بلغة دلفي
الرد
تم الشكر بواسطة:
#3
اولا
ضع متغير (I) في العام (اول الفورم مش في نفس BUTTON)
PHP كود :
Dim i As Integer 

ضع هذا الكود في BUTTON  
PHP كود :
On Error Resume Next
        DGV_units
.ClearSelection()
 
       For i i To DGV_units.Rows.Count 1
            If DGV_units
.Rows(i).Cells(3).Value.ToString.Contains(TextBox12.TextThen
                DGV_units
.Rows(i).Selected True
                DGV_units
.FirstDisplayedScrollingRowIndex i
                Exit 
For
 
           End If
 
       Next
        If Not i 
DGV_units.Rows.Count 2 Then
            i 
+= 1
        Else
            i 
0
        End 
If 
مع تغير رقم العمود البحث بالرقم الى عندك
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد
تم الشكر بواسطة:
#4
يا ريت حد يعمله مثال لانه مش زابط خالص
الرد
تم الشكر بواسطة:
#5
اتفضل اخي 

.rar   WindowsApplication10.rar (الحجم : 74.38 ك ب / التحميلات : 43)
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد
#6
تسلم اخي محمود صالح المثال تمام ميه ميه
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  البحث بتاريخ اليوم في الدتا جريد فيو mazentq 5 114 27-05-20, 08:36 PM
آخر رد: rochdi191
  [VB.NET] طلب كود تصدير بيانات داتا جريد فيو إلى وورد waelalmsry75 11 1,469 15-05-20, 11:55 PM
آخر رد: aljzazy
  [VB.NET] إظهار جدول آخر يحمل البيانات عن طريق البحث من خلية في داتاغريد Alhootti1 2 112 06-05-20, 04:46 AM
آخر رد: Alhootti1
  [سؤال] عايز اعمل مرفق وعرضه في داتا جريد فيو عاصم النجار 0 66 02-05-20, 10:58 AM
آخر رد: عاصم النجار
  [VB.NET] كيف اقضي على مشاكل الكود البحث ةالاضافة و التعديل بالعربية في فيجوال بيسك rochdi191 5 153 01-05-20, 04:26 PM
آخر رد: rochdi191
  [كود] رمضان مبارك يا اخوتي اريد كود بحث عن الاسم لقد اتعبني البحث rochdi191 8 198 25-04-20, 11:32 PM
آخر رد: rochdi191
  [سؤال] سؤال حول داتا جريد فيو mohamedahmed1 4 133 02-04-20, 10:03 PM
آخر رد: alshandodi
  تحديد نتيجة البحث ZaerAllail 9 258 01-04-20, 10:54 PM
آخر رد: سعود
  [VB.NET] داتا قرايد فيو محمد القطيبي 5 237 21-03-20, 09:23 PM
آخر رد: محمد القطيبي
  مشكله داتا جريد فيو mohamedalqadi 17 491 21-03-20, 01:03 PM
آخر رد: 351028

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


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