大佬求解啊
将求阶乘定义为名叫fact的用户自定义函数；将选择排序定义为名叫sort的用户自定义函数；将找n个数的最大值定义为名叫max的用户自定义函数；将找最小值定义为名叫min的用户自定义函数；将求平均值定义为名叫ave的用户自定义函数；编写主程序调用上述用户·自定义函数实现功能。
我的想法是先将一个数组用sort函数有大到小排序，然后再求出这数组的最大值最小值和平均值的一个VB程序，然后fact函数在另外一个VB程序。
#VB#

感觉自己是整一个VB都听的云里雾里的，唉

基本上就没几个懂的感觉

这个主程序你想用什么顺序调用这些函数都可以，先排序或者先求最大值什么的都无所谓，关键是有想法就好

Function Fact(N As Integer) As Long
Dim s As Long, i%
s = 1
For i = 1 To N
s = s * i
Next i
Fact = s
End Function
Function Max(a() As Integer) As Integer
Dim i%
For i = LBound(a) To UBound(a)
If a(i) > Max Then Max = a(i)
Next i
End Function
Function Min(a() As Integer) As Integer
Dim i%
Min = a(LBound(a))
For i = LBound(a) + 1 To UBound(a)
If a(i) < Min Then Min = a(i)
Next i
End Function
Function Ave(a() As Integer) As Double
Dim i%, s As Double
For i = LBound(a) To UBound(a)
s = s + a(i)
Next i
Ave = s / i
End Functio

这几个题目的组合，这几天是第几次了？
是不是出完题，老师说，不会的话，就到百度去，有个vb贴吧……