以下过程的功能是从数组中寻找最大值：Private Sub FindMax(a()As Integer， ByRef Max As Integer) Dim s As Integer， f As Integer Dim i As Integer s＝LBound(a) f＝UBound(a) Max＝a(s) For i＝s To f If a(i)>Max Then Max＝a(i) NextEnd Sub以下关于上述过程的叙述中，错误的是( )。