龙空技术网

求一维数组的最小值的自定义函数

Access软件网 67

前言:

现在大家对“js求数组最小值”大致比较关心,同学们都需要剖析一些“js求数组最小值”的相关知识。那么小编也在网上搜集了一些关于“js求数组最小值””的相关资讯,希望朋友们能喜欢,我们一起来了解一下吧!

先以此文祝贺首个“中国医师节”。敬佑生命、救死扶伤、甘于奉献,用”无疆的大爱“守护着万千人的健康。

求一维数组的最小值原理:先赋一个最大值给变量,这个最大值我取了这个数组的元素之和(各元素>0),然后与其他数字比较,遇到比他小的就再将值赋给这个变量,如果是空值就跳到下一个数,直到比较完成,最后的就是最小值了。

代码:

Private Function MyMin(strMin As String) As Single

Dim varA As Variant

Dim i As Long

Dim sngA As Single

varA = Split(strMin, ",")

sngA = 0

For i = 0 To UBound(varA)

If IsNull(varA(i)) or varA(i) = "" Then

GoTo here

Else

sngA = sngA + varA(i)

End If

here:

Next i

For i = 0 To UBound(varA)

If varA(i) < sngA Then

sngA = varA(i)

End If

Next i

MyMin = sngA

End Function

示例下载 :(在“了解更多”里下载)

图 示:

标签: #js求数组最小值