我想知道这个编程是什么意思

来源：百度知道 编辑：UC知道 时间：2024/05/31 09:31:08
Dim I As Integer, Sum As Integer
Sum = 0
I = 1

Do
Sum = Sum + I
I = I + 1
Loop While I < 101

Label1.Caption = "Do...Loop while 结果为:"
Label.Caption = Format(Sum)
请高手详细解答~~因为本人刚刚学vb~~

没学过VB，但是根据语法看应该是:
Dim I As Integer, Sum As Integer //定义I,Sum为整数型
Sum = 0 //赋值Sum=0
I = 1 //赋值I=1

Do
Sum = Sum + I
I = I + 1
Loop While I < 101 //I从1循环到100结束，I=101,SUM=5050

Label1.Caption = "Do...Loop while 结果为:"
Label.Caption = Format(Sum) //计算结果