问题描述: 用VB写设计程序代码,求:s=1+(1+2)+(1+2+3)+……+(1+2+3+……+n)的值. 要求用DO循环 1个回答 分类:综合 2014-10-18 问题解答: 我来补答 在窗体放一个按钮Private Sub Command1_Click()Dim n As Long,i As Long,sum As Double,sum0 As Doublen = Val(InputBox("输入一个正整数"))Do While i 展开全文阅读