[Abu Ehab]

السلام عليكم

لا مش صعب ولا  شيئ
وانا لا اتعامل مع البيسك من 5 سنوات   تركتها 
لكن لأنك قلت   صعب    دخلت اساعدك 

PHP كود :

Public Class Form1
    Dim i As Integer = 60
    Dim p As Integer = 0
    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        If i = 0 Then
            i = 60
            Dim str As String = TextBox1.Text
            Dim splitStr As String() = str.Split("#"c)
            TextBox2.Text = splitStr(p).ToString()
            p = p + 1
        Else
            i = i - 1
            Me.Text = i
        End If
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Timer1.Interval = 100
        Timer1.Enabled = True
        Timer1.Start()

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.Text = "احمد#يوسف#حسن#فارس#مصطفى#ابراهيم#حسين#خالد#علي#وليد#رياض#قاسم"
    End Sub
End Class 


نصيحة لوجه الله تعالى 
أترك  البيسك خالص  أنساها   ... تعامل مع السي شارب 
يعطيكم العافية