منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

انا قمت بعمل فورم عبارة عن داتا جريد فيــــو و بحث بالداتا جريد فيو
و مربعات نص .... و عند الاشارة الى سجل معين بالداتا جريد فيو
ينقل بيانات السجل الى مربعات النص ..... هذا قبل البحث تمــــــام

و لكن الســــــــــــــؤال لو تكرمتم ..... و هو مــــا أريده

أريد بعد البحث عند الاشارة الى سجل معين بالداتا جريد فيو

ينقل بيانات السجل الى مربعات النص و هذا لا يحدث

---

هذا هو كود اختيار الداتا جريد فيو  ==== و لكنه لا يعمل بعد اجراء عملي  البحث  == يعمل فقط قبل البحث

Private Sub DataGridView2_SelectionChanged(sender As Object, e As EventArgs) Handles DataGridView2.SelectionChanged

                                                                                                                                    Try
                                   Dim Pos As Integer = BindingContext(Orders).Position
                                                     ("Label.Text = Orders.Rows(Pos).Item("ID
                                  ("TextBox1.Text = Orders.Rows(Pos).Item("Order_No
                ("DateTimePicker1.Value = Orders.Rows(Pos).Item("Order_Date
                ("DateTimePicker2.Value = Orders.Rows(Pos).Item("Order_Time
                                         ("TextBox2.Text = Orders.Rows(Pos).Item("Driver
                                 ("TextBox3.Text = Orders.Rows(Pos).Item("Driver_Car
                                    ("TextBox4.Text = Orders.Rows(Pos).Item("Company
                                        ("TextBox5.Text = Orders.Rows(Pos).Item("Region
                                      ("TextBox6.Text = Orders.Rows(Pos).Item("Material
                                         ("TextBox7.Text = Orders.Rows(Pos).Item("Diesel
                                      ("TextBox8.Text = Orders.Rows(Pos).Item("Quantity
                                       ("TextBox9.Text = Orders.Rows(Pos).Item("Diesel2
                               ("CheckBox1.Checked = Orders.Rows(Pos).Item("Status
                                                                                       
                                                                                            Catch ex As Exception

                                                                                                                   End Try
                                                                                                                          End Sub