Public Class Form1
    Dim a As Integer = 0
    Dim b As Integer = 0
    Dim c As Integer = 0
    Private Sub btnstart_Click(sender As Object, e As EventArgs) Handles btnstart.Click
        Timer1.Start()
    End Sub

    Private Sub Label2_Click(sender As Object, e As EventArgs)

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        c += 1
        Label2.Text = a & " : " & b & " : " & c
        If c = 100 Then
            c = 0
            b += 1
            Label2.Text = a & " : " & b & " : " & c
            If b = 60 Then
                b = 0
                a += 1
                Label2.Text = a & " : " & b & " : " & c
                If a = 60 Then
                    Timer1.Stop()
                    a = 0
                    b = 0
                    c = 0
                    Label2.Text = a & " : " & b & " : " & c
                End If

            End If
            End If
    End Sub

    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs)

    End Sub

    Private Sub btnstop_Click(sender As Object, e As EventArgs) Handles btnstop.Click
        Timer1.Stop()

        'Label2.Text = a & " : " & b & " : " & c

    End Sub

    Private Sub btnreset_Click(sender As Object, e As EventArgs) Handles btnreset.Click
        a = 0
        b = 0
        c = 0
        Label2.Text = a & " : " & b & " : " & c
    End Sub

    Private Sub btnquit_Click(sender As Object, e As EventArgs) Handles btnquit.Click
        Close()

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
End Class