检查数字是否为整数，然后再比较它们在vb net中不起作用。

Dim input As String = "123"
Dim number As Integer

If Integer.TryParse(input, number) Then
    ' 转换成功，number变量中存储了整数值
    ' 可以在这里进行比较操作
    If number > 0 Then
        ' 执行操作
    End If
Else
    ' 转换失败，输入的字符串不是一个有效的整数
End If

Dim number1 As Integer = 10
Dim number2 As Integer = 20

If number1 > number2 Then
    ' number1大于number2
ElseIf number1 < number2 Then
    ' number1小于number2
Else
    ' number1等于number2
End If