永发信息网

vba中求1到100的代数和

答案:3  悬赏:20  手机版
解决时间 2021-03-25 19:14
  • 提问者网友:王者佥
  • 2021-03-24 19:39
vba中求1到100的代数和
最佳答案
  • 五星知识达人网友:雪起风沙痕
  • 2021-03-24 21:04

Sub aa()
  Dim s&, i%
  For i = 1 To 100
    s = s + i
  Next i
  Cells(1, 1).Value = s
End Sub
全部回答
  • 1楼网友:冷風如刀
  • 2021-03-24 21:23
Sub t()
  Dim n As Integer
  For i = 1 To 100
    n = n + i
  Next
  MsgBox "1到100的代数和为:" & n
End Sub
  • 2楼网友:归鹤鸣
  • 2021-03-24 21:16
Sub s()
    For i = 1 To 100
        sm = sm + i
    Next
    MsgBox sm
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯