我有4个变量,它们包含一些值。
我已经将它们转换为数字 CDbl 。
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))