单项选择题

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