单选题设有下列程序　　Private Sub Form Click() 　　X=50 　　For i=1 T0 4 　　 y=InputBox("请输入一个整数") 　　 y=Val(v) 　　 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。