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

نسخة كاملة : كود لربط combo box مع text box
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
اطلب من سيادتكم كود لربطcombo box مع  text box  لعرض محتويات combo box في text box وجزاكم الله خيرا
تفضل
Textbox1.text = combobox1.selecteditem.tostring
السّلام عليكم و رحمة الله و بركاته
إضافة لما تفضّل به الأخ و الأستاذ الكريم 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


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

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


اخي الكريم LoveVb هذ الكود خاص بال net.  ولا يخص vb6
اسف لم انتبه للقسم