在窗体上有一个命令按钮Commandl,编写事件代码如下: Private SuB cormmandl_Click() Dim y As Integer y=0 Do y=Input Box(“y=”) IF(y Mod 10)+Int(y/1

admin2010-04-21  34

问题 在窗体上有一个命令按钮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)。
转载请注明原文地址:https://kaotiyun.com/show/NKwp777K
0

最新回复(0)