我试图将两个值相互比较,我的程序在满足条件时正确返回。例如; 9< = 100,返回重新排序。但如果我将9更改为101,它仍会返回重新排序。我该怎么办才能解决这个问题?任何帮助表示赞赏
Private Function ReOrderPriority() As String
Dim imp As Integer = 0
If imp = (StockFrmTxtBox6.Text <= StockFrmTxtBox8.Text) Then
Return "Re-Order"
Else
Return "Not yet applicable"
End If
End Function
答案 0 :(得分:2)
那是因为你正在进行字符串比较,而不是整数比较。您必须先将输入解析为Integer
。
Private Function ReOrderPriority() As String
If Integer.Parse(StockFrmTxtBox6.Text) <= Integer.Parse(StockFrmTxtBox8.Text) Then
Return "Re-Order"
Else
Return "Not yet applicable"
End If
End Function