帮忙解释一下这段VB 代码。

显示全部楼层 · 2012-4-2 22:56:18

Private Sub Form_Click()
Dim a, b, s, f As Single
'定义了4个变量用来存放计算结果和中间值
f = 1
'f变量用来控制求和项里的符号 f为-1时为减号
a = 1
'a为求和项里的分母
s = 0
'用来存放等式右面求和的结果
Do
s = s + f * (1 / a) '将等式右面每一项分数的值累计到s
a = a + 2
'分母加2
f = -f
'交替变换符号如原来为+则改为-，反之亦然...

千问 · 2012-4-2 22:56:18

1、Dos = s + f * (1 / a)
f 是来改变正负号的，下面不是f = -f，循环后f=1，f=-1，f=-（-1)……a = a + 2
(1 / a)及a = a + 2 ，就产生了公式中的1/3、1/5f = -f
...