[单项选择题] 有如下函数： Function fun(a As Integer,n As Integer) As Integer Dim m As Integer While a＞=na＝

[单项选择题] 有如下函数：

Function fun(a As Integer,n As Integer) As Integer

Dim m As Integer

While a＞=n

a＝a-n

m＝m+1

Wend

fun=m

End Function

该函数的返回值是( )

A．a乘以n的乘积

B．a加n的和

C．a减n的差

D．a除以n的商(不含小数部分)