有如下函数：
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的商(不含小数部分)

私の今日あるのはあなたのおかげです。そのほかならぬあなたのお願いと（）、私にできる限りのことはさせてもらうつもりです。

A.いえば

B.きたら

C.いえども

D.あれば