【单选题】

下列程序的运行结果是()。

Private Function myfun(m，n)
Do While m＞n
Do While m＞n:m=m-n:Loop
Do While n＞m:n=n-m:Loop
Loop
myfun=m
End Function
Private SubCommand1_Click()
Print myfun(9，8)
End Sub
A．2
B．1
C．4
D．3