[abdualla]

لا داعي للاعتذار، انا اللي فهمت انك زعلت مني واعتذر منك

---

جرب هذا التعديل

PHP كود :

Dim lSeconds = 0
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    lSeconds = lSeconds - 1
    lblTime.Text = TimeSpan.FromSeconds(lSeconds).ToString
    If lSeconds = 0 Then Timer1.Stop()
End Sub

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
    lSeconds = CInt(Tgroup.Interval)
    lblTime.Text = TimeSpan.FromSeconds(lSeconds).ToString
    Timer1.Interval=1000
    Timer1.Start()
End Sub