Vbscript 如何找到变量之间的最小数？

我有4个变量，它们包含一些值

我已经用CDbl将它们转换成数字

所以我有这样的想法：

var1=CDbl(str1)
var2=CDbl(str2)
var3=CDbl(str3)
var4=CDbl(str4)

---

如何找到var1、var2、var3和var4之间的最小数字？

以下方法有效。您只需将值作为数组传递

Function FindSmallest(arr)
    out = arr(0)
    For i = 1 to UBound(arr)
        If out > arr(i) Then
            out = arr(i)
        End If
    Next
    FindSmallest = out
End Function

WScript.Echo FindSmallest(Array(var1,var2,var3,var4))

---

回答得很好，你为他们做了家庭作业，他们甚至不需要尝试。所以，基本上他们什么也没学到，除了在网站上快速发布一行就可以了。