单项选择题

有如下程序段:
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,则程序在窗体上的输出结果为______。

A) 16 24 4
B) 16 24 8
C) 24 16 6
D) 24 16 8