如何找到变量之间的最小数字?

How can I find the smallest number between variables?

我有 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))