+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس (/showthread.php?tid=22291)
مساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس - khaled12345 - 28-10-17
السلام عليكم الاخوة الاعزاء
الرجاء في المساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس
عند الضغط علي مفاتيح التنقل (Next , previous , frist and last )
في المشروع المرفق
مع جزيل الشكر
RE: مساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس - a.ahmed - 28-10-17
PHP كود :
Private Sub DataGridView1_SelectionChanged(ByVal sender As Object, ByVal e As EventArgs) Handles DataGridView1.SelectionChanged
Dim r As DataGridViewRow = Me.DataGridView1.CurrentRow
TxtID.Text = r.Cells(0).Value.ToString
TextBox1.Text = r.Cells(1).Value.ToString
TextBox2.Text = r.Cells(2).Value.ToString
TextBox3.Text = r.Cells(3).Value.ToString
DateTimePicker1.Value = r.Cells(4).Value.ToString
TextBox4.Text = r.Cells(5).Value.ToString
TextBox5.Text = r.Cells(6).Value.ToString
End Sub
RE: مساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس - khaled12345 - 28-10-17
(28-10-17, 08:35 PM)a.ahmed كتب :PHP كود :
Private Sub DataGridView1_SelectionChanged(ByVal sender As Object, ByVal e As EventArgs) Handles DataGridView1.SelectionChanged
Dim r As DataGridViewRow = Me.DataGridView1.CurrentRow
TxtID.Text = r.Cells(0).Value.ToString
TextBox1.Text = r.Cells(1).Value.ToString
TextBox2.Text = r.Cells(2).Value.ToString
TextBox3.Text = r.Cells(3).Value.ToString
DateTimePicker1.Value = r.Cells(4).Value.ToString
TextBox4.Text = r.Cells(5).Value.ToString
TextBox5.Text = r.Cells(6).Value.ToString
End Sub
مشكوووور يا هندسة
الكود يعمل تمام مع جزيل الشكر لحضرتك