vb吧 关注：156,058贴子：1,166,225
- 4回复贴，共1页
不感兴趣
开通SVIP免广告
七奈 （1）ReDim Preserve a(1 To 21) '保留原数组元素的基础上加一个元素
（2）For i = 20 To n Step -1 '虽然你知道加Step，但是却做了多余的修改
（4）a(i + 1) = a(i) '将每个数字依次后移（注：如果你把第2行改成 For i = 21 To n + 1 Step -1 ，那么你原来的答案就是正确的）
（5）a(n) = x '这个你写对了
（3）a(i) = Int(Rnd * 91 + 10) '题目原来的写法是10~99，你改成了1~100
（6）Text1.Text = Text1.Text & a(i) & " " '这个你也写对了
（2）For i = 20 To n Step -1 '虽然你知道加Step，但是却做了多余的修改
（4）a(i + 1) = a(i) '将每个数字依次后移（注：如果你把第2行改成 For i = 21 To n + 1 Step -1 ，那么你原来的答案就是正确的）
（5）a(n) = x '这个你写对了
（3）a(i) = Int(Rnd * 91 + 10) '题目原来的写法是10~99，你改成了1~100
（6）Text1.Text = Text1.Text & a(i) & " " '这个你也写对了
