方女士，28岁，孕1产0，妊娠36周，血压150/100mmHg，下肢浮肿，尿蛋白为1.0g/24小时，无自觉症状。

孕妇2小时前突然发生持续性腹痛伴 * * 少量流血，首先应考虑（）。

A．先兆早产

B．先兆流产

C．先兆子宫破裂

D．前置胎盘

E．胎盘早剥

某人设计了下面的函数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