A-A+
在窗体上有一个命令按钮Commandl 编写事件代码如下:Private SuB cormm
问题详情
在窗体上有一个命令按钮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)。