[VB.NET]

استخدمت هذا الكود ولاكن المشكلة بيضيف سطر واحد فقط وباقي الاسطر فارغة

If e.KeyChar = ChrW(Keys.Enter) Then

sql = "select ItemCode,ItemName,ItemPrice from Items where ItemCode ='" + TextBox1.Text + "'"
Dim dt_itm As New DataTable
dp = New OleDb.OleDbDataAdapter(sql, con)
dp.Fill(dt_itm)
dgv_data.Rows.Add()
dgv_data.Rows(0).Cells(0).Value = dt_itm.Rows(0)("ItemCode")
dgv_data.Rows(0).Cells(1).Value = dt_itm.Rows(0)("ItemName")
dgv_data.Rows(0).Cells(2).Value = dt_itm.Rows(0)("ItemPrice")




End If

---

هذي صورة توضيحية

---

صورة توضيحية