求100内的奇数的和

来源:互联网 发布:tensorflow reuse 编辑:程序博客网 时间:2024/05/22 12:40
Private Sub Form_Load()
Dim i As Integer
Dim s As Integer
Show
For i = 1 To 100 Step 2
s = s + i
Next i
Print "1~100奇数累加和为:"; s