问题
单项选择题
在窗体上有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1 Click()
Dim y As Integet
y=0
Do
y=Inout Box(’y=’)
If(y Mod 10)+Int(y/10)=10 Then Debug．Print y；
LoopUntil 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
解析： 此sub的作用是输出个位上的数、十位上的数相加和为10的数，其中y Mod 10是求出个位上的数Int(y/10)是求出十位上的数。