以下是一个能返回数组a中最大数的函数过程代码：Functionmaxval(a（）AsInteger)AsIntegerDimmax%max=1Fori=2To10Ifa(i)>a(max)Thenmax=iNextimaxval=maxEndFunctionPrivateSubCommand1_Click（）Dimx(1To10)AsIntegerFori=1To10x(i)=Int(Rnd（）100)Printx(i);NextiPrintPrintmaxval(x（）)EndSub程序运行时，发现函数过程的返回值是错的需要修改，下面的修改方案中正确的是（）。
A.语句“max=1”应改为“max=a(1)”
B.语句“Fori=2To10”应改为“Fori=1To10”
C.If语句“max=i”应改为“max=a(i)”
D.语句“maxval=max”应改为“maxval=a(max)”
正确答案：D