(22-07-14, 07:21 AM)silverlight كتب : تقريبا الكود سيكون شئ من هذا القبيل
أضف تايمر + 2 باتون + تكست بوكس الي الفورم حتي يعمل معك الكود جيدا
ممكن تستخدم Label مثلا بدلا من التكست بوكس

كود :

Public Class Form1
    Private i As Integer = 0
    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        i += 1
        TextBox1.Text = i
    End Sub

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

    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Timer1.Enabled = False
        Timer1.Stop()
    End Sub
End Class