在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub CommandI_Click() Dim Y As Integer y=0 Do Y=InPutBox{”Y”} If(y

admin2020-06-06  30

问题 在窗体上有一个命令按钮Commandl,编写事件代码如下:
    Private  Sub CommandI_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 rood 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)。
转载请注明原文地址:https://jikaoti.com/ti/ZeQ0FFFM
0

最新回复(0)