s=1+(1+2)+(1+2+3)+…+(1+2+3+…+n)求大神看看这个VB怎么编.

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/11/06 04:20:49

s=1+(1+2)+(1+2+3)+…+(1+2+3+…+n)并设置S上限例如选中5000时当S>5000时停止计算在列表中输出S和N的值

我帮你做!试下下,问一下,在列表中输出是什么意思,具体点,列表框吗?我是用VB6.0不知道行不行?
再问：额就是在哪个白框框中输出···我的是VS2008 菜鸟+新手应付考试有劳了
再答： Private Sub Command1_Click()
Dim s As Integer, i As Integer, j As Integer
s = 1
For i = 1 To 10000
     For j = 1 To i
        s = s + j
     Next j
     If Option1.Value = True Then
           If s > 1000 Then
              Exit For
           End If
     End If
     If Option2.Value = True Then
           If s > 5000 Then
              Exit For
           End If
     End If
     If Option3.Value = True Then
           If s > 10000 Then
              Exit For
           End If
     End If
Next i
List1.AddItem s & Space(3) & i
End Sub

你可以参考我的设计自己再修改一下，请采纳哦！！！

vb语句编写S=1*2*3*……*n的值怎么编? 求vb编写程序大神求当s=1*2*3*4...*n小于或者等于5000时最大的n值及此时的s值. c语言程序 s=1!+2!+3!+4!.n!这个程序怎么编 VB循环语句求s=1+3+5+……+2n-1的值 VB编程：编递归函数过程,计算1+2+3……..+n的值（n是自然数）求2个VB代码 1 求斐波那契数列第29位数 2 s=1+2+3+…+n 当n为多少时 s>10000大神们帮帮忙 VB程序设计设计程序s=-1+ ／3 - ／5 + ／7 +……+（-1）^n * ／（2n-1）求阶乘y=1!+2!+3!+4!+ .+n!大神帮帮忙看看那里错了 VB编程n!+(n+1)!+(n+2)!+(n+3)!+……+(n+m)! 用VB编程求1+2+3+……+n,n由键盘输入 VB编程~求s=1!+2!+3!+4!+……+10! 用VB求S=1!+2!+3!+……+99!