单项选择题

阅读下面的程序：
Private Sub Form_Click()
Dim m，n As Integer
m=InputBox("请输入M的值")
m=Val(m)
m1=m
n=InputBox("请输入N的值")
n=Val(n)
n1=n
Do While n＜＞0
remin=m Mod n
m=n
n=remin
Loop
Print m1，n1，m
End Sub
程序运行后，单击窗体，在对话框中分别输入16和24，则程序在窗体上的输出结果为