[单项选择题] 某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下： Function MaxValue(a()As Integer)As Integer Dim max%

[单项选择题] 某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：

Function MaxValue(a()As Integer)As Integer

Dim max%

max=1

For k=2 To 10

If a(k)＞a(max) Then

max=k

End If

Next k

MaxValue=max

End Function

程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是( )

A．语句max＝1应改为max＝a(1)

B．语句For k=2 To 10应改为For k=1 To 10

C．If语句中的条件a(k)＞a(max)应改为a(k)＞max

D．语句MaxValue=max应改为MaxValue=a(max)

D

由题易知，For循环结束后可得出数组中最大数的下标max，因为是求最大的数，应该是将a(max)赋给MaxValue而不是最大数的下标max，故应选D。