【单选题】

有如下函数：

Function fun(aAs Integer,nAS Integer)As Integer
Dim mAs 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的商(不含小数部分)