单项选择题

单击命令按钮时,下列程序段的执行结果为( )。
Private Sub Command1_Click()
Print Func1(24,18)
End Sub
Public Function Func1(m As Integean 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
Func1=m
End Function

A.8
B.6
C.4
D.2