在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim y As Integer y=0 Do y=InPutBox{"y"} If(y Mod 10)+Int(y/10)=10 The

admin2019-02-19  31

问题 在窗体上有一个命令按钮Command1,编写事件代码如下:
Private Sub Command1_Click()
Dim y As Integer
y=0
Do
y=InPutBox{"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

解析 分析if语句,当计算表达式(y mod 10)+int(y/10)等于10时,立即窗口显示输入的数字。当输入第一个数字10时,(v mod 10)+int(y/10)=0+1=1不等于l0,不显示;当输入第二个数字37时,(y rood 10)+int(y/10)=7+3=10,显示数字37,依次类推,结果为选项D)。
转载请注明原文地址:https://kaotiyun.com/show/HQ0p777K
0

最新回复(0)