数组内最小值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师，在写一个顾客输入的多个内容与当前月份比较的最小值的功能，要不能小于当前月份。。。

Dim y0 As Integer = Date.Today.Month

Dim Multi As String = "1|2|3|4|5" '顾客输入的,不固定的

Dim Values() As String

Values = Multi.split("|")

Dim g As Integer '相减

Dim i As Integer

For i = 0 To Values.Length - 1

g = values(i) - y0

If g >= 0 Then

If xxxxxxxxx Then '这里要取出g最小值，不知道怎么写，

Exit For

End If

output.show(values(i))

主题：数组内最小值