有如下函数过程：
FunctiOngyS(By Val X As Integer，ByValy As Integer)As Integer
DOWhiley＜＞0
reminder=x Mody
X=y
y=reminder
Loop
gys=x
End FunctiOn
以下是调用函数的事件过程，该程序的运行结果是，( )。
PriVate Sub Command7_Click()
Dima As Integer
Dimb As Integer
a=100
b=25
x=gys(a，B.
PrintX
End Sub

A．0

B．25

C．50

D．100