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

关于影响密度分辨率的因素，正确的是

A．扫描剂量越高，噪声越大；密度分辨率增加。

B．扫描剂量越高，噪声越小；密度分辨率减少。

C．扫描剂量越高，噪声越小；密度分辨率增加

D．扫描剂量越低，噪声越大；密度分辨率增加

E．扫描剂量越低，噪声越小；密度分辨率减少