Question

vb中for循环，do while循环嵌套，求解

我想dt有个取值范围，-100到100，请问怎么编呢？这是我的程序类似如下：
for i=0 to 10
x(i)=……
y(i)=……
z(i)=x(i)+y(i)
if z(I)<300
do
x(I)=x(i)+dt
x(I)=y(i)+dt

z(i)=x(i)+y(i)

until z(i)>300
end if
next i
写错了点
do
x(i)=x(i)+dt
y(i)=y(i)+dt

Answer 1

你写一个while循环代码，不求DT啊，但同样的代码dowhile写没有意义的。

Answer 2

少了while吧？

Answer 3

你这是写了一段循环代码，不是求DT啊，而且这段代码dowhile写的没意义了。

追问

那应该怎么改，我的意思是dt必须有一个取值范围

追答

dt的取值范围很简单啊：if( dt > -100) and (dt<100) then
执行语句
endif

Answer 4

不太明白，DT是随机数吗

追问

差不多，x(i)=x(i)+dt,y(i)=y(i)+dt,dt只能在-100到100这个范围类取某个值能满足x(i)+y(i)<30就停止

追答

怎么你 追问的 和你的问题是矛盾的啊

追问

哦哦，我记错了，哈哈(i)+y(i)>300

追答

Randomize
Dim x(10) As Integer
Dim y(10) As Integer
Dim z(10) As Integer

For i = 0 To 10
x(i) =...
y(i) = ...
z(i) = x(i) + y(i)
If z(i) 300
End If
Next i