15-11-16, 12:01 AM
تفضل اخي الكريم :
Dim x As Long
For x = 0 To ListBox1.Items.Count - 1
TextBox2.Text = ListBox1.Items(x).ToString
Next
وهكذا عندما تريد اضافة اكثر من text
Dim x As Long
For x = 0 To ListBox1.Items.Count - 1
TextBox2.Text = ListBox1.Items(x).ToString
Next
وهكذا عندما تريد اضافة اكثر من text

