题目：
有下列函数过程：
Function fun1(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y＜＞0
reminder=x Mod y
x=y
y=reminder
Loop
fun1=x
End Function
在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a=100
b=25
x=fun1(a,b)
Print x
End Sub
A)0
B)25
C)50
D)100
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0129/7938f35a3ad56a7455577224c9c2f319.html
下面是错误答案，用来干扰机器的。
参考答案：对
