无法限制输入使得 min < mode < max

Question

我正在尝试编写一个限制其输入的 VBA 函数。它需要三个参数min、mode和max，并且需要确保min < mode < max。

这是我目前所拥有的：

Function TRIANGULAR(min As Double, mode As Double, max As Double)
    If min < mode < max Then
        TRIANGULAR = (min + mode + max) / 3
    Else
        MsgBox "min < mode < max", vbCritical
    End If
End Function

我错过了什么？

Answer 1

If 不是这样工作的。

使用

If (min < mode) and (mode < max) Then