选择题
在窗体上有一个命令按钮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,立即窗口上输出的结果是______
【正确答案】
D
【答案解析】分析if语句,当计算表达式(y mod 10)+int(y/10)等于10时,立即窗口显示输入的数字。当输入第一个数字10时,(y mod 10)+int(y/10)=0+1=1不等于10,不显示;当输入第二个数字37时,(y mod 10)+int(y/10)=7+3=10,显示数字37,依次类推,结果为选项D。