程序段如下： Dim i As Integer，s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s，i执行的结果是( )。

A
解析：For循环的结束条件是循环变量的值在变化方向上“超过”终值，本题循环变量i的初值为4，终值为1，步长为1，所以变化方向是从大到小，在i=4、i=3、i=2和i=1时，分别执行一次循环，在循环中把循环变量i的值(4、3、2、1)分别加到变量s中。四次循环过后，循环变量的值变为0，已经在变化方向上超过了终值，循环结束。