阅读下面的程序：
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