(30-10-17, 10:46 PM)a.ahmed كتب :

PHP كود :

For I As Integer = DGV1.Rows.Count - If(DGV1.AllowUserToAddRows, 2, 1) To 0 Step -1
    If Not DGV1.Rows(I).Cells(0).Value.ToString.Contains(TextBoxX1.Text) Then DGV1.Rows.RemoveAt(I)
Next 


(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 Object, e As EventArgs) Handles MyBase.Load
        gd()
    End Sub
    Private Sub TextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles 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.AllowUserToAddRows, 2, 1)
                    If Not (Me.DataGridView1.Rows(r).Cells(0).Value.ToString = TextBox1.Text) Then
                        Me.DataGridView1.Rows(r).Visible = False
                    Else
                        Me.DataGridView1.Rows(r).Visible = True
                    End If
                Next
            End If
        End If
    End Sub
End Class