单项选择题

单击命令按钮时,下列程序的运行结果为
Private Sub Command1_Click()
 Print Fun(23,18)
End Sub
Public Function Fun(m As Integer,n As Integer)As Integer
 Do While m<>n
   Do While m>n:m=m-n:Loop
   Do While m<n:n=n-m:Loop
Loop
Fun=m
End Function

A.0
B.1
C.3
D.5
热门 试题