[larbihamri]

تفضل جرب هذا الكود 
في هذا الكود البحث يكون عند الضغط مرتين على سطر في الداتاقريد و النتيجة تظهر في داتاقريد ثانية 

كود :

myadapter = New OleDbDataAdapter("select * from tbl_vente where id_order =" & dgv.CurrentRow.Cells("id_order").Value, con)
       dt_Vente = New DataTable
       myadapter.Fill(dt_Vente)
dgv_vente.Rows.Clear()
       For i As Integer = 0 To dt_Vente.Rows.Count - 1
           dgv_vente.Rows.Add()
           dgv_vente.CurrentCell = dgv_vente.Rows(dgv_vente.Rows.Count - 1).Cells(3)

           Dim RowIndex As Integer = dgv_vente.CurrentRow.Index
           dgv_vente.Item("id", RowIndex).Value = dt_Vente.Rows(i)!id
           dgv_vente.Item("id_order_v", RowIndex).Value = dt_Vente.Rows(i)!id_order
           dgv_vente.Item("id_produit_v", RowIndex).Value = dt_Vente.Rows(i)!id_produit
           dgv_vente.Item("nom_produit", RowIndex).Value = dt_Vente.Rows(i)!nom_produit
           dgv_vente.Item("famille_produit", RowIndex).Value = dt_Vente.Rows(i)!famille_produit
           dgv_vente.Item("qty", RowIndex).Value = dt_Vente.Rows(i)!qty
           dgv_vente.Item("prix_a", RowIndex).Value = dt_Vente.Rows(i)!prix_a
           dgv_vente.Item("prix_v", RowIndex).Value = dt_Vente.Rows(i)!prix_v
           dgv_vente.Item("total", RowIndex).Value = dt_Vente.Rows(i)!total
           dgv_vente.Item("date_v", RowIndex).Value = dt_Vente.Rows(i)!date_v
       Next