求VB程序，要简单点的

来源：百度知道编辑：UC知道时间：2024/05/31 03:39:01

10.设计程序完成13+ 23 + 33 +…+103 的累加值。结果送至变量Sum。

给你完整的
Private Sub Command1_Click()
Dim Sum , i As Double
For i = 13 To 103 Step 10
Sum = Sum + i
Next
MsgBox Sum
End Sub

for i = 1 to 10
Sum = Sum + i * 10 + 3
next i

sum=0
for a=1 to 10
sum=sum+a*10+3
next a