有下列函数过程： FunCtion Fun1ByvAl xAs intEgEr,ByvAl yAs intEgEr)As intEgEr Do whilE y＜＞0rEminDEr=x moD yx=yy=rEminDEr loop Fun1=xEnD FunCtion 在下列按钮单击事件中调用该函数，则该程序的运行结果是()。 privAtE suBCommAnD1_CliCk() Dim AAs intEgEr Dim BAs intEgEr A=100 B=25 x=Fun1(A,B) print x EnD suB
A、0
B．25
C、50
D．100