السلام عليكم ورحمة الله وبركاته
اخوتي الاعزاء
الان يوجد لدي ليست بوكس يوجد به اربع اجابات احتاج كود لاستراد الاجبات من الليست بوكس الي 4 ليبول كل ليبول يكون اجابة من هذا الليست
وجزاكم الله خيرا
و عليكم السلام و رحمة الله و بركاته
اذا كانت الاجابات تأخذ مرتبة كما هي عليه في الليست بوكس فهذا سيفي بالغرض
و احرص على استبدال كلمة تكست بوكس بكلمة ليبل على النحو الذي سردته في نص سؤالك
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For i = 1 To 4
Me.Controls(String.Format("TextBox{0}", i)).Text = ListBox1.Items(i - 1).ToString
Next
End Sub
مشكور اخي الكريم ولكن لم يعمل الكود مرفق صورة الخطاء
هذا النموذج مجرب و يعمل كما سبق و ان ذكرت لك
جزاك الله خيرا اخي الكريم اشتغل كدا