【单选题】

执行下列程序段后，变量s的值是______。

Dim SAs Integer，nAs Integer
S=0:n=1
Do While n＜100
S=S+N
n=n+1
Loop
A．5050 B．4950
C、3000D．4000