请问这个怎么解？
PrivateSubCommand1_Click()DimsAsDoubleDimiAsIntegers=5i=1DoWhilei<9i=i+2s=s+iLoopText...
Private Sub Command1_Click()
Dim s As Double
Dim i As Integer
s = 5
i = 1
Do While i < 9
i = i + 2
s = s + i
Loop
Text1.Text = s
End Sub
程序运行后，Text1的输出结果是( )。 展开
Dim s As Double
Dim i As Integer
s = 5
i = 1
Do While i < 9
i = i + 2
s = s + i
Loop
Text1.Text = s
End Sub
程序运行后，Text1的输出结果是( )。 展开
1个回答
展开全部
这题就是考你Do While循环的变量是怎么变化的！
当i=1，满足条件，进入循环，i=1+2=3,s=5+3=8
当i=3，满足条件，进入循环，i=3+2=5,s=8+5=13
当i=5，满足条件，进入循环，i=5+2=7,s=13+7=20
当i=7，满足条件，进入循环，i=7+2=9,s=20+9=29
当i=9，不满足条件，不进入循环 ，最后s的值是29
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
