在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB cormmandl_Click()Dim y As Inte

在窗体上有一个命令按钮Commandl，编写事件代码如下：

Private SuB cormmandl_Click()

Dim y As Integer

y=0

Do

y=Input Box(“y=”)

IF(y Mod 10)+Int(y/10)=10 Then DeBug.print y;

Loop Until y=0

End SuB

打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、－19、0，立即窗口上输出的结果是

A．37 55 64 28 19 19

B．10 50 20

C．10 50 20 0

D．37 55 64 28 19

D解析：本题接受从键盘输入的Y值，直到输入的值为0为止。对于输入的Y值，将Y除10的模与Y除10的商相加，和为10的打印输出，也即Y值的个位数与十位数的和为10的值输出。因此本题符合条件的值为D)。