VB哪位高手帮我详细讲解下这道题？？谢谢

执行下面的程序段后，X的值为 x = 5 For i = 1 To 20 Step 2 x = x + i尀5 Next i

2024-12-17 20:33:05

推荐回答（3个）

回答1：

i=1,3时，i\5=0，x=5，i=5,7,9时，i\5=1，x=5+1+1+1=8。i=11,13时，i\5=2，x=8+2+2=12，i=15,17,19时，i\5=3，x=12+3+3+3=21。i=21时，退出循环。最后x=21。

回答2：

x = 5 '赋值5给x
For i = 1 To 20 Step 2 '从1到20循环每次递增2
x = x + i\5 '赋值x+i\5 给x,i\5 是i\5 取余
Next i

x最后结果是21

回答3：

x = 5
For i = 1 To 20 Step 2
x = x + i\5
Next
msgbox x

教你一招把上面的代码复制到记事本中,再把记事本重命名为x.vbs
双击 x.vbs 就得到21了.