有如下VB程序段：

For i=2 to 5

  For j=i to 5

    If j mod i=0 then a(j)=a(j)+1

  Next j

Next i

For i=1 to 5

  If a (i)<>1 then s=str(i)+s

Next i

若数组a 的初始值都为0，则运行该程序段后，s的值为（    ）

A、2 3 5

B、1 4

C、5 3 2

D、4 1