在计时器中设置1分钟

Question

我将拥有这个对象：文本框，进度条和按钮。 我需要按下按钮并开始1分钟，然后你在texbox中输入整数，他们必须计算它，并在分钟结束时加总...显示我输入了多少数字和总和.. 到目前为止，我理解如何运行计时器，但我如何为这个过程提供条件，我的意思是我捕获数字，但我如何链接时间和进度条？

Public Class Form1
    Dim recolector As Integer
    Dim contador As Integer
    Dim sumatoria As Integer

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnAgregar.Click
        Try
            recolector = Integer.Parse(txtNumero.Text)


        Catch ex As Exception

        End Try
    End Sub


    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Timer1.Interval = 60000

        While Timer1.Interval < 60000


        End While
    End Sub
End Class