问题
单项选择题
设有以下程序：
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．100
B．50
C．120
D．70
答案
参考答案：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为本题答案。