تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البحث في datagridview
#1
اخواني هذا الكود البحث في dgv بالتعليم على العنصر او التركيز على العنصر
انا مش عاوز كده انا عاوز لما ابحث يحذف الى مش متوافق مع كلمة البحث ويخلي المتوافق ففط (يعني من الاخر زي البحث بجملة select بتظهر النتائج المتوافقه فقط)
فارجو التعديل على الكود او اي طريقة اخرى
كود :
       On Error Resume Next
       DGV1.ClearSelection()
       For I As Integer = 0 To DGV1.Rows.Count - 1
           If DGV1.Rows(I).Cells(0).Value.ToString.Contains(TextBoxX1.Text) Then
               DGV1.Rows(I).Selected = True
               DGV1.FirstDisplayedScrollingRowIndex = I
               Exit For
           End If
       Next
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
For As Integer DGV1.Rows.Count - If(DGV1.AllowUserToAddRows21To 0 Step -1
    
If Not DGV1.Rows(I).Cells(0).Value.ToString.Contains(TextBoxX1.TextThen DGV1.Rows.RemoveAt(I)
Next 
الرد }}}
تم الشكر بواسطة: سعود
#3
(30-10-17, 10:46 PM)a.ahmed كتب :
PHP كود :
For As Integer DGV1.Rows.Count - If(DGV1.AllowUserToAddRows21To 0 Step -1
    If Not DGV1
.Rows(I).Cells(0).Value.ToString.Contains(TextBoxX1.TextThen DGV1.Rows.RemoveAt(I)
Next 

الف شكر اخي الكريم . بس في حاجة ناقصة وهي مهمة جدا 
هنا بيمسح فقط يعني لا رجوع الى المحتوى الاصلي 
بمعنى انا لو مسحت كلمة البحث بعد البحث لن يرجع العناصر الموجودة في dgv مرة اخرة
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد }}}
تم الشكر بواسطة: سعود
#4
الحل ان تعيد التحميل من مصدر البيانات

PHP كود :
Public Class Form1
    Private Sub gd
()
 
       Me.DataGridView1.Rows.Clear()
 
       Me.DataGridView1.Rows.Add("سعود""123")
 
       Me.DataGridView1.Rows.Add("سعد""321")
 
       Me.DataGridView1.Rows.Add("مسعود""312")
 
   End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        gd
()
 
   End Sub
    Private Sub TextBox1_KeyDown
(sender As ObjectAs KeyEventArgsHandles TextBox1.KeyDown
        If e
.KeyData Keys.Enter Then
            If TextBox1
.Text.Trim "" Then
                gd
()
 
           Else
                For r 
As Integer 0 To Me.DataGridView1.Rows.Count IIf(DataGridView1.AllowUserToAddRows21)
 
                   If Not (Me.DataGridView1.Rows(r).Cells(0).Value.ToString TextBox1.TextThen
                        Me
.DataGridView1.Rows(r).Visible False
                    Else
                        Me
.DataGridView1.Rows(r).Visible True
                    End 
If
 
               Next
            End 
If
 
       End If
 
   End Sub
End 
Class 


الملفات المرفقة
.zip   For_Any.zip (الحجم : 78.97 ك ب / التحميلات : 232)
الرد }}}
تم الشكر بواسطة: محمود صالح
#5
(31-10-17, 03:00 AM)سعود كتب : الحل ان تعيد التحميل من مصدر البيانات

PHP كود :
Public Class Form1
    Private Sub gd
()
 
       Me.DataGridView1.Rows.Clear()
 
       Me.DataGridView1.Rows.Add("سعود""123")
 
       Me.DataGridView1.Rows.Add("سعد""321")
 
       Me.DataGridView1.Rows.Add("مسعود""312")
 
   End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        gd
()
 
   End Sub
    Private Sub TextBox1_KeyDown
(sender As ObjectAs KeyEventArgsHandles TextBox1.KeyDown
        If e
.KeyData Keys.Enter Then
            If TextBox1
.Text.Trim "" Then
                gd
()
 
           Else
                For r 
As Integer 0 To Me.DataGridView1.Rows.Count IIf(DataGridView1.AllowUserToAddRows21)
 
                   If Not (Me.DataGridView1.Rows(r).Cells(0).Value.ToString TextBox1.TextThen
                        Me
.DataGridView1.Rows(r).Visible False
                    Else
                        Me
.DataGridView1.Rows(r).Visible True
                    End 
If
 
               Next
            End 
If
 
       End If
 
   End Sub
End 
Class 
شكرا اخي على الرد 
انا عملت نفس الفكرة لكن قابلتني مشكة وهي عند الرجوع الى مصدر البيانات الى هي محملة في متغير من نوع datatable 
برجعها مرة واحد فقط لا ادري فين المشكة رغم اني عامله على مستوى الفورم ولكن بيسند المعلومات للداتا قريد فيو مرة واحدة
If textbox1.text<>"" then
كود البحث
Else
Dgv1.datasours=dt

لو تخدمني ازاي اخلي المتغير محتفظ ببياناته حتى غلق الورم مثل
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 2 164 05-03-24, 08:27 PM
آخر رد: مصمم هاوي
  [VB.NET] البحث باستخدام CheckedListBox لتكون نتيجة التحديد شرط لجملة الاستعلام ahmedramzyaish 0 116 19-02-24, 03:44 AM
آخر رد: ahmedramzyaish
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 295 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] ظهور التاريخ غير مرتب بالأقدم في datagridview مبرمج صغير 1 4 304 26-01-24, 03:41 PM
آخر رد: atefkhalf2004
  [VB.NET] التاريخ في أداة أبو سامر لطباعة DataGridView مبرمج صغير 1 17 629 26-01-24, 01:52 AM
آخر رد: مبرمج صغير 1
  البحث بالهوية annagui 2 315 25-01-24, 01:00 PM
آخر رد: annagui
  مشكلة في datagridview Adata 4 310 17-01-24, 03:00 PM
آخر رد: aljzazy
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 464 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify
  [كود] البحث Abdellatif 2 208 27-12-23, 03:15 PM
آخر رد: Abdellatif
Lightbulb [VB.NET] إطهار الصورة بمقاس معين في DataGridView أبو خالد الشكري 2 323 14-12-23, 03:01 PM
آخر رد: أبو خالد الشكري

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


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