单项选择题

单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click（）
Print MyBM（23, 18）
End Sub
Public Function MyBM（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
MyBM=m
End Function（ ）。
A．0
B．1
C．3
D．5