为什么跳不出循环?
For i = 0 To T Step (T / 83)For n = 1 To 10
Ux1 = Ux1 + (O1(n) * Cos(n * w * i) + P1(n) * Sin(n * w * i))
Uy1 = Uy1 + (OO1(n) * Cos(n * w * i) + PP1(n) * Sin(n * w * i))
Next n
Ux1 = Ux1 + d1(0) / 2 + (b1(0) * L1) / (2 * E1 * A1)
Uy1 = E1 * A1 * Uy1 + b1(0) / 2 + Wr - L1 * G1
Ux1 = 39.37 * Ux1
Uy1 = 0.00056 * Uy1
Picture1.PSet (Ux1, Uy1), RGB(0, 255, 0)
Ux1 = 0: Uy1 = 0
Next i
为什么运行到这个循环就终止不了了,一直循环,是什么原因啊?