VB中的do while loop语句
本人菜鸟，希望高手细细的讲一讲下面的代码是什么意思PrivateSubCommand1_Click()Dima,b,s,iAsIntegera=Val(Text1.Tex...
本人菜鸟，希望高手细细的讲一讲下面的代码是什么意思
Private Sub Command1_Click()
Dim a, b, s, i As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
s = 0
i = a
Do While i <= b
s = s + i
i = i + 1
Loop
MsgBox "计算结果为:" & s
End Sub
请高手讲一讲每个步骤是什么意思 展开
Private Sub Command1_Click()
Dim a, b, s, i As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
s = 0
i = a
Do While i <= b
s = s + i
i = i + 1
Loop
MsgBox "计算结果为:" & s
End Sub
请高手讲一讲每个步骤是什么意思 展开
6个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
