Question

我需要在visual basic中的文本框中找到两个数字之间的差异。我需要它能够找到数字之间的差异，即使在第二个文本框中输入了更大的数字。

这就是我的代码现在的样子。问题是有些数字在不存在时会显示为负数而其他数字则表示正常。

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

    Dim FirstNumber As Integer
    Dim SecondNumber As Integer
    Dim Difference As String

    FirstNumber = txtFirstNumber.Text
    SecondNumber = txtSecondNumber.Text
    Difference = txtDifferenceAnswer.Text

    If txtFirstNumber.Text < txtSecondNumber.Text Then

        Difference = txtSecondNumber.Text - txtFirstNumber.Text

    Else

        Difference = txtFirstNumber.Text - txtSecondNumber.Text

    End If

    txtDifferenceAnswer.Text = Difference

Answer 1

您可以使用Math.Abs获取绝对值，然后使用Int32.TryParse：

Dim FirstNumber As Int32
Dim SecondNumber As Int32
Dim Difference As Int32

If Int32.TryParse(txtFirstNumber.Text, FirstNumber) AndAlso Int32.TryParse(txtSecondNumber.Text, FirstNumber) Then
    Difference = Math.Abs(FirstNumber - SecondNumber)
    txtDifferenceAnswer.Text = Difference.ToString()
Else
    txtDifferenceAnswer.Text = "Enter valid integers!"
EndIf

我建议您在设置中设置Option Strict to On。那么你的代码就不会编译这是一件好事，因为你很快就会学到如何编写健壮而有效的代码，而这些代码并不依赖于编译器技巧来解析你的不兼容类型。

如何找到在文本框中输入的两个数字之间的差异？

1 个答案: