[amgad525]

PHP كود :

Dim arr() As String

arr = TextBox1.Text.Split(" ")

For i = 0 To 29

    If i > arr.Length Then Exit For

Dim s As String = arr(i)

    If s = "End" Then Exit For

    TextBox2.Text = TextBox2.Text & s

Next