منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط (/showthread.php?tid=39305)

المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - bilgacim - 14-08-21

السلام عليكم  أحبتي 

المطلوب  كود  فيجوال  VB   لجعل   TEXTBOX     تساوي datagridview  عند  الضغط  على حقل  في  datagridview    يعني  كل  ما اضغط على حقل تتغير   البيانات ....في التاكست بوكس ........


وشكرا  مسبقا

RE: المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - ابراهيم ايبو - 14-08-21

السلام عليكم ورحمة الله وبركاته
اخي الكريم في الحدث التالي
كود :
 Private Sub dgv_table_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgv_table.CellContentClick
       Try

           Txt_CV_ID.Text = dgv_table.CurrentRow.Cells(0).Value.ToString()
           Txt_CV_Name.Text = dgv_table.CurrentRow.Cells(1).Value.ToString()
           CComboBox1.Text = dgv_table.CurrentRow.Cells(2).Value.ToString()

       Catch ex As Exception
           Return
       End Try
   End Sub
غير اسم الداتاغرايد واسماء التكست بوكس او الكومبوبوكس

RE: المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - bilgacim - 14-08-21

(14-08-21, 07:22 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم في الحدث التالي
كود :
 Private Sub dgv_table_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgv_table.CellContentClick
       Try

           Txt_CV_ID.Text = dgv_table.CurrentRow.Cells(0).Value.ToString()
           Txt_CV_Name.Text = dgv_table.CurrentRow.Cells(1).Value.ToString()
           CComboBox1.Text = dgv_table.CurrentRow.Cells(2).Value.ToString()

       Catch ex As Exception
           Return
       End Try
   End Sub
غير اسم الداتاغرايد واسماء التكست بوكس او الكومبوبوكس

شكرا   اخي  الكريم   .....لكن عند  استعمال  الاسهم   نزولا وصعودا    لا يتغير محتوى التاكست بوكس

RE: المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - ابراهيم ايبو - 14-08-21

السلام عليكم ورحمة الله وبركاته
اخي انت طلبت عند النقر اما ان تتغير مع الاسهم 
استخدم الحدث SelectionChanged 
كود :
Private Sub dgv_table_SelectionChanged(sender As Object, e As EventArgs) Handles dgv_table.SelectionChanged
       Try

           Txt_CV_ID.Text = dgv_table.CurrentRow.Cells(0).Value.ToString()
           Txt_CV_Name.Text = dgv_table.CurrentRow.Cells(1).Value.ToString()
           ComboBox1.Text = dgv_table.CurrentRow.Cells(2).Value.ToString()
       
       Catch ex As Exception
           Return
       End Try
   End Sub


RE: المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - bilgacim - 14-08-21

[quote pid='176124' dateline='1628957181']
نسال  الله لك  الرضى   ورفقة الرسول عليه الصلاة والسلام  في الجنة...تحياتي  
[/quote]

RE: المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط - ابراهيم ايبو - 15-08-21

الحمد لله والشكر لله
ولك اخي الكريم Bilgacim
ولك ايضا مثل مادعوت لي واكثر بارك الله فيك ولك