[mohamdser]

معذرة على التدخل ولكن ربما تقصد طريقة المصفوفات
وهو نفس الكود تقريبا

     

PHP كود :

       Dim no(3) As String
        no(1) = "ali"
        no(2) = "ameer"
        no(3) = "ahmed"
        TextBox1.Clear()
        Dim i As Integer
        For i = 1 To 3

            TextBox1.Text &= no(i) & " "

        Next 


ويمكن ترك no() فارفة عند التعريف dim
كهذا

PHP كود :

       Dim no() As String 


لتعريف عدد كبير من الاسماء وليس 3 فقط