13-02-17, 06:33 PM
عندى label و list of string
اريد اضافة هذه items فى label
لاكن الكود يدخل اخر item فقط
كود :
Dim test As New List(Of String)
test.Add("SSSSSSSSSSSSSSSS")
test.Add("SSSSSSSSSSSSSSSS2")
test.Add("SSSSSSSSSSSSSSSS3")
test.Add("SSSSSSSSSSSSSSSS4")
test.Add("SSSSSSSSSSSSSSSS5")
test.Add("SSSSSSSSSSSSSSSS6")
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For i = 0 To test.Count - 1
Label1.Text = vbNewLine & test(i)
Next
End Sub