تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تعديل في عملية البحث
#1
السلام عليكم اخواني الاعزاء 
ارجو التكرم بتعديل كود البحث في الجريد فيو المباشر ، حيث يقوم البحث بشكل جيد ولكن المشكلة الصف الاول دائما يظهر عند عملية البحث

On Error Resume Next
        BRANDataGridView.ClearSelection()
        For i As Integer = 0 To BRANDataGridView.Rows.Count - 0
            BRANDataGridView.Rows(i).Visible = True
            If BRANDataGridView.Rows(i).Cells(0).Value.ToString.Contains(TextBox3.Text.Trim) Then

                BRANDataGridView.Rows(i).Visible = True
         
            End If

        Next

علما بأني استخدم الفيجول بيسك 2010  تتصل عن طريق المعالج
الرد
تم الشكر بواسطة: حريف برمجة , حريف برمجة
#2
استخدم الكود هكذا :


كود :
       For Each r As DataGridViewRow In BRANDataGridView.Rows
           If r.Cells(0).Value.ToString.Contains(TextBox3.Text.Trim) Then
               r.Visible = True
           Else
               r.Visible = False
           End If
       Next

اذا كنت لاتحتاج لرقم الصف لماذا تدخل نفسك في متاهة ال index وال count ؟

اذا لم تعمل بعد ارني صورة الداتا جريد فيو بالعنصر الاول ربما كان به عنصر شرطه متحقق دائما
الرد
تم الشكر بواسطة: حريف برمجة , حريف برمجة , abu7shihab , WaeLx
#3
شكرا لك استاذي العزيز
سأوافيك بالرد

[attachment=25648 كتب :Anas Mahmoud pid='166682' dateline='1599799922']استخدم الكود هكذا :


كود :
       For Each r As DataGridViewRow In BRANDataGridView.Rows
           If r.Cells(0).Value.ToString.Contains(TextBox3.Text.Trim) Then
               r.Visible = True
           Else
               r.Visible = False
           End If
       Next

اذا كنت لاتحتاج لرقم الصف لماذا تدخل نفسك في متاهة ال index وال count ؟

اذا لم تعمل بعد ارني صورة الداتا جريد فيو بالعنصر الاول ربما كان به عنصر شرطه متحقق دائما

شكرا لك استاذي العزيز مره اخرى على مرورك
نفس المشكلة مازل الصف الاول يظهر عند الفلتره كما هو موضح بالصورة المرفقة
والعنصر الاول لا يفرق فقد غيرته ونفس المشكلة


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة: حريف برمجة
#4
وجدت الحل للموضوع البحث : وسأطرحه هنا لكي يستفيد الجميع


Private Sub TextBox8_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox8.TextChanged
Dim records = From BILL In Database1DataSet.BILL Where BILL.TEL Like TextBox8.Text & "*" Select BILL
BILLBindingSource.DataSource = records.AsDataView
End Sub

دمتم بود اخواني الاعزاء
الرد
تم الشكر بواسطة: Anas Mahmoud , حريف برمجة , asemshahen5 , WaeLx , WaeLx
#5
شكرا لوضع الحل
+1
الرد
تم الشكر بواسطة: حريف برمجة , asemshahen5 , WaeLx


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في تعديل كود ميدو الفنان 4 129 16-09-20, 06:17 PM
آخر رد: ميدو الفنان
  [كود] تصحيح او تعديل كود البحث في نص مشكل عبد الهادي بهاب 6 200 16-09-20, 03:54 PM
آخر رد: عبد الهادي بهاب
  [VB.NET] تعديل البيانات من خلال فورم آخر EbrNaj00 6 185 16-09-20, 12:42 AM
آخر رد: EbrNaj00
  عملية جمع قيمة التكست ZaerAllail 10 219 15-09-20, 09:24 PM
آخر رد: ZaerAllail
  المساعدة في التعديل على كود تعديل البيانات في قاعدة سيكوال سيرفر momani33 3 71 15-09-20, 08:10 PM
آخر رد: Anas Mahmoud
  [سؤال] تنظيم ارفاق المستندات في قاعدة البيانات Sql واحضار الملفات حسب قيمة البحث محمد العامر 10 370 07-09-20, 12:28 AM
آخر رد: محمد العامر
  السلام عليكم ممكن توضيح بسيط بخصوص البحث داخل الليست بوكس اليوم السابع 5 300 21-08-20, 01:40 PM
آخر رد: اليوم السابع
  لو سمحتم اريد تعديل على هذا المشروع خالد كامل1 3 316 20-08-20, 06:09 PM
آخر رد: خالد كامل1
Sad كود حذف السجلات المختاره عن طريق (التشيك بوكس ) اسف تم تعديل المطلوب عمور2016 8 445 19-08-20, 10:44 PM
آخر رد: عمور2016
  ممكن تعديل على هذا المثال اساتذتى خالد كامل1 3 321 19-08-20, 09:02 AM
آخر رد: حريف برمجة

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


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