某人设计了下面的函数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) 把语句a\10＞=0改为a\10＜0 B) 把错句n=1改为n=0 C) 把语句a=a\10改为a=a Mod 10 D) 把循环条件a\10＞=0改为a\10＞0