Private Sub Form_Click()
a = InputBox("")
b = 2
If a <= b Then
  x = 1: Print x
Else
  y = 5: Print y
End If
End Sub
    为什么a=1后输出5

本人已经试过，可能是楼主RP不好，应该不会出现楼主说的情况

很简单，a没有定义，所以a是字符串。
字符串和数比较大小比较麻烦。

用val試試