窗体上有一名称为Command1的命令按钮，其事件过程如下：

Private Sub Command1_Click( )

Dim i As Integer,j As Integer , k As Integer

Dim s As Double

s=0 ; i=1 ; j=0 ; k=-1

Do While i<6

s=s+k*（j/i）

i=i+1

j=j+1

k=-k

Loop

Print s

End Sub

以上程序所计算的表达式是（）。

A．1/2-2/3+3/4-4/5

B．-1/2+2/3-3/4+4/5

C．1-1/2+2/3-3/4+4/5

D．-1+1/2-2/3+3/4-4/5