单选题 某人设计了下面的函数fun，功能是返回参数a中数值的位数。
Function fun(a As Integer)As Integer
Dim n%
n=1
While a/10＞=0
n=n+1:a=a/10
Wend
fun=n
End Function
在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是______。

• A.把语句n=1改为n=0
• B.把循环条件a/10＞=0改为a/10＞0
• C.把语句a=a/10改为a=a Mod 10
• D.把语句fun=n改为fun=a