单选题
设有以下程序: Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox("请输入一个整数") y=Val(y) If y Mod 5=0 Then a=a+y:x=y Else a=a+x End If Next i Print a End Sub 程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为
【正确答案】
A
【答案解析】[解析] 当i=1时进行第一次循环,输入第一个值,y=15,y mod 5=0条件成立,a=15,x=15;当i=2时,y=24,y mod 5=0条件不成立,执行Else子句,a=30;i=3时,y=35,If条件成立,a=65,x=35;当i=4时,y=46,If条件不成立,执行Else子句,a=100;当i=5时,循环条件不成立,退出循环,执行输出操作,输出a的值为100,故A为本题答案。