VB编程1到99的阶乘相加怎么写？

考试题，试用VB程序语言写出程序：求S=1！+2！+3！+......+99！的值。

帮忙分析一下，谢啦。

Private Sub Command1_Click()
  Dim a As Double  '定义2个double类型的变量
  Dim count As Double
  count = 1  '给一个变量赋值
  For a = 1 To 100 Step 1  ' 一个for循环 从1到100 每次循环加一
  count = count + a    '循环时执行 这个公式
  Next a    '结束循环
  Print count    '打印count
End Sub

如果觉得好请采纳 给个评价 谢谢

把里面的 count = 1改成 count = 0 因为他是从一开始加的一开始循环的时候应该等于0 第一次循环就是1一直到100 所以是count要等于0   不好意思刚刚写错了

在直接打开VB 创建个按钮 在 把代码写进 里面就可以直接运行了 运行的结果是5050

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息