[سؤال] كود لربط combo box مع text box - نسخة قابلة للطباعة

[سؤال] كود لربط combo box مع text box - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] كود لربط combo box مع text box (/showthread.php?tid=16938)

كود لربط combo box مع text box - abazrmhamed - 23-08-16

اطلب من سيادتكم كود لربطcombo box مع text box لعرض محتويات combo box في text box وجزاكم الله خيرا

RE: كود لربط combo box مع text box - LoveVb - 23-08-16

تفضل
Textbox1.text = combobox1.selecteditem.tostring

RE: كود لربط combo box مع text box - عبد العزيز البسكري - 23-08-16

السّلام عليكم و رحمة الله و بركاته
إضافة لما تفضّل به الأخ و الأستاذ الكريم LoveVb .. جزاه الله خيرًا و زادها بموازين حسناته .. هذه طريقة أخرى حسب ما فهمته لعلّها تفي بالغرض إن شاء الله
فائق إحتراماتي

كود :

Private Sub Form_Load()

Combo1.AddItem (111)

Combo1.AddItem (222)

Combo1.AddItem (333)

Combo1.AddItem (444)

Combo1.AddItem (555)

End Sub

Private Sub Combo1_Click()

Text1.Text = Combo1.Text

End Sub

RE: كود لربط combo box مع text box - ahmedabdelaliem - 24-08-16

(23-08-16, 11:21 AM)LoveVb كتب : تفضل
Textbox1.text = combobox1.selecteditem.tostring

السلام عليكم ورحمة الله وبركاته

اخي الكريم LoveVb هذ الكود خاص بال net. ولا يخص vb6

RE: كود لربط combo box مع text box - LoveVb - 24-08-16

اسف لم انتبه للقسم