Question

VB编程计算s=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+...,当第i项的值<10的-4次方

Answer 1

问：VB编程计算s=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+...,当第i项的值<10的-4次方

答：以下是使用Visual Basic编写的计算s的代码，该代码会计算当第i项的值小于10的-4次方时，s的值：

答：在此代码中，我们使用了一个循环来计算每一项的值，并将其加到变量s中，直到当前项的值小于0.0001为止。在每次循环中，我们首先将i的值增加1，然后计算当前项的值，这里使用了分数形式的通项公式1/((i-1)*(i+1))。计算出当前项的值后，将其加到s中，直到当前项的值小于0.0001为止。最后，我们使用MsgBox函数将s的值显示在消息框中。请注意，这个求和级数的计算是无限的，因此在代码中我们使用了一个循环来控制计算的结束。

问：有没有最基础的那种比如 用from i in range 之类的while

问：dim i as 还有mzgbox还没学过

答：您看下这个可以吗？

问：我不是想要详细解答就是想换种方法因为是学校作业还没学过你给我的这种方法

答：您把MsgBox换成Console