[VB.NET] ขอวิธีการเขียนโค้ดนับเวลาถอยหลัง อ้างอิงจากเว็บไซต์หน่อยครับ

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Dim startdate As DateTime = DateTime.Parse(Date.Now)
        Dim enddate As DateTime = DateTime.Parse("13-11-2558 23:59")
        Dim ts As TimeSpan = enddate.Subtract(startdate)



        If ts.Seconds < 0 Then
            Timer1.Stop()
            Timer2.Stop()
            Time.Text = "กรุณาเติมวันใช้งาน"
            Label1.Text = "ไม่พร้อมใช้งาน"
            Button1.Enabled = False
            Label1.ForeColor = Color.Red
            MsgBox("เวลาการใช้งานของคุณหมดเเล้ว", vbCritical, "Expire Time")
            MsgBox("สามารถเติมเวลาใช้งานเพิ่มได้ที่หน้าเพจ", vbInformation, "Expire Time")
            Me.Close()

        End If
        Time.Text = CStr(ts.Days) & " : " & CStr(ts.Hours) & " : " & CStr(ts.Minutes) & " : " & CStr(ts.Seconds)
    End Sub