[حريف برمجة]

PHP كود :

Dim i As Integer = 1

        For y As Integer = 1 To 50

            If i > 50 Then Exit For

            ListBox1.Items.Add(i)
            i += 1

            ListBox2.Items.Add(i)
            i += 1

        Next