单项选择题

下列程序的运行结果是( )。
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 Sub Command1_Click()
Print myfun(9, 8)
End Sub

A) 2

B) 1

C) 4

D) 3