有如下VB程序段：

s=0：t=0

For i=1 To 5

    If a(i)-a(i+1)<t Then

        t=a(i)-a(i+l)

        s=s+1

    End If

Next i

数组元素a(1)到a(6)的值依次为“4，5，3，2，7，5”，执行该程序段后，变量s的值为（    ）

A、1

B、2

C、3

D、4