VB For循环

是for j=20 to 1 step -1
你语法错了。

b = 1
For j = 20 To 1 step - 1
b = b * j
msgbox b
Next j

使用For的错误

在for j=20 to 1 -1 中， 即为for j=20 to 0， 实际上因20>0,一次也不执行。

可改成for j=20 to 1 step -1 或者 for j=1 to 20

应该用两个for循环的，你这个只能得到For j = 20 To 1 step - 1 后也只有最后一个是正确的。改为这样试试，上机调试通过
b = 1
For j = 20 To 1 Step -1
For i = 1 To j
b = b * i
Next i
Print b
b = 1
Next j