Vb.net 我如何计算比赛结果？

我正在尝试创建一个跑步者，用户可以输入三个参赛者并输入他们的时间，结果将根据文本框上的最快时间显示，到目前为止，我已经完成了编码，但我不知道为什么当我按下结果按钮时它不起作用

这是我的比赛代码

Private Sub btnCalculate_Click(sender As System.Object, e As System.EventArgs) Handles btnCalculate.Click

        Dim mRunner1Time As String
        Dim mRunner2Time As String
        Dim mRunner3Time As String


        mRunner1Time = (Val(uiRunner1TimeTextBox.Text))
        mRunner2Time = (Val(uiRunner2TimeTextBox.Text))
        mRunner3Time = (Val(uiRnner3TimeTextBox.Text))

        If mRunner1Time < mRunner3Time And mRunner1Time < mRunner2Time And _
                mRunner2Time < mRunner3Time Then

            uiFirstTextBox = uiRuuner1TextBox
            uiSecondTextBox = uiRunner2TextBox
            uiThirdTextBox = uiRunner3TextBox

        ElseIf mRunner1Time < mRunner3Time And mRunner1Time < mRunner2Time And
            mRunner3Time < mRunner2Time Then

            uiFirstTextBox = uiRuuner1TextBox
            uiSecondTextBox = uiRunner3TextBox
            uiThirdTextBox = uiRunner2TextBox

        ElseIf mRunner2Time < mRunner1Time And mRunner2Time < mRunner3Time And
            mRunner1Time < mRunner3Time Then

            uiFirstTextBox = uiRunner2TextBox
            uiSecondTextBox = uiRuuner1TextBox
            uiThirdTextBox = uiRunner3TextBox

        ElseIf mRunner2Time < mRunner1Time And mRunner2Time < mRunner3Time And
            mRunner3Time < mRunner1Time Then

            uiFirstTextBox = uiRunner2TextBox
            uiSecondTextBox = uiRunner3TextBox
            uiThirdTextBox = uiRuuner1TextBox


        ElseIf mRunner3Time < mRunner1Time And mRunner3Time < mRunner2Time And
            mRunner1Time < mRunner2Time Then

            uiFirstTextBox = uiRunner3TextBox
            uiSecondTextBox = uiRuuner1TextBox
            uiThirdTextBox = uiRunner2TextBox

        ElseIf mRunner3Time < mRunner1Time And mRunner3Time < mRunner2Time And
            mRunner2Time < mRunner1Time Then

            uiFirstTextBox = uiRunner3TextBox
            uiSecondTextBox = uiRunner2TextBox
            uiThirdTextBox = uiRuuner1TextBox
        End If
        End Sub

Private Sub btnCalculate\u Click（发送方作为System.Object，e作为System.EventArgs）处理btnCalculate。单击
将mrunner1时间设置为字符串
将mRunner2Time设置为字符串
将mrunner3时间设置为字符串
mRunner1Time=（Val（uiRunner1TimeTextBox.Text））
mRunner2Time=（Val（uiRunner2TimeTextBox.Text））
mRunner3Time=（Val（uiRnner3TimeTextBox.Text））
如果mRunner1Time

请阅读。顺便问一下：为什么不将这三个值放入一个数组中，然后应用函数呢？您要更改的是TextBox的Text属性。语句的格式应该是

uiFirstTextBox.Text=uiRunner1TextBox.Text

谢谢大家，它工作得很好，有没有办法保存表单的内容？