问题
单项选择题
在窗体上有一个命令按钮Commandl，编写事件代码如下：
PrivateSubCommandl_Click（）
DimyAsInteger
y＝0
DO
y＝InputBox（"y＝"）
If（yModl0）＋Int（y/10）＝10ThenDebug.Printy；
LoopUntily＝0
EndSub
打开窗体运行后，单击命令按钮，依次输入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用以存放输入的整数，通过Do-Loop Until循环中的语句“y=InputBox("Y=")”将输入的值赋值给变量y，程序通过Do-Loop Until循环语句来判断输入的值是否符合条件，即语句"If(y Mod 10)+Int(y/10)＝10”，该语句的意思是，判断“变量y对10取模”与“变量y整除10”相加后的值，如果结果等于10，则输出变量y的值，不等于10则继续判断下一个值，直到输入的数为0，符合循环结束条件，跳出Do-Loop Until循环。题面要求依次输入10、37、50、55、64、20、28、19、-19、0，所以立即窗口上输出的结果是：37 55 64 28 19。