[单项选择题] 某人设计了下面的函数fun，功能是返回参数a中数值的位数 Function fun(a As Integer)As Integer Dim n% n=1 While a1

[单项选择题] 某人设计了下面的函数fun，功能是返回参数a中数值的位数

Function fun(a As Integer)As Integer

Dim n%

n=1

While a10＞＝0

n＝n+1

a＝a10

Wend

fun=n

End FUnction

在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是( )

A．把语句n=1改为n=0

B．把循环条件a10＞＝0改为a10＞0

C．把语句a＝a10改为a=a Mod 10

D．把语句fun=n改为fun=a