请高人指点下VB中的计算 说下为什么这么谢！

Dim s As Long，x As Integer

s=0

For x=9To10 Step2

S=s+x

Nest x

Text1.Text=s

程序执行后 变量S的值

谢谢了 帮帮忙吧 啥也不会呀

还有题不会 请加我的QQ好吗250322225

请写出过程 详细一点

谢谢啦

9

结果是9 应为只循环了1次啊 第一次S=9 啊 文本就等于9啊

代码都写错了 正确的是：

Private Sub Command1_Click() Dim s As Long, x As Integer s = 0 For x = 9 To 10 Step 2 s = s + x Next x Text1.Text = s End Sub

Private Sub Command1_Click() Dim s As Long, x As Integer '定义s为长整型，X为整数型

s = 0 '设S的初始值为0,默认时也是0,可以不要这句

For x = 9 To 10 Step 2 '循环9至10,步长为2,10-9就是1,所以循环一次，step为正数，所以要小于或等于10,在此没什么影响

s = s + x 's的值等于s的值加上循环的X值,即0+9=9

Next x '退出循环

Text1.Text = s '将s的值赋给text1，最后输出的结果是9

End Sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息