单项选择题

设有以下函数过程： 　　Function fun(a As Integer，b As Integer) 　　 Dim c As Integer 　　 If a　　 c=a：a=b：b=C 　　 End IF 　　 c=0 　　 Do 　　 c=c+a 　　 Loop Until c Mod b=0 　　 fun=c 　　End Function 　　若调用函数fun时的实际参数都是自然数，则函数返回的是( )。