单选题设有下列程序：
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

【答案解析】[解析] 本题源程序通过For循环输入4个整数，并判断其是否能被5整除。若能被5整除，则将其累加入变量a中，并将其赋值给变量x；否则将变量x的值累加入变量a中。第1次执行循环体时，输入值为15，a=0+15，x=15；第2次执行循环体时，输入值为24，a=15+15=30；第3次执行循环体时，输入值为35，a=30+35=65，x=35；第4次执行循环体时，输入值为46，a=65+35=100。