回复者有分

Question

设椭圆中心在原点，x,y轴长度为a,b那么
记 u = (x*cosθ+y*sinθ)/a; (1)
v = (x*sinθ-y*cosθ)/b; (2)
椭圆方程为
u^2 + v^2 = 1
变换方程(1),(2)为
x = a*cosθ*u - b*sinθ*v;
y = -a*sinθ*u-b*cosθ*v;
不知道那错了，大家能把求椭圆上一点的坐标值的公式告诉我吗

Answer 1

标准公式：
(x-a)/(m^2)+(y-b)/(n^2)=1(a,b)椭圆中心
m为半长轴长
n为半短轴长还有，如果你要画椭圆，用circle方法就可以了。
然后
x=m*cosθ+a
y=n*sinθ+b
真是有分人，呵呵~~接

Answer 2

什么是偏心角？这个是平面坐标系中某点向量与x轴正方向的夹角，怎么不对呢？
推导：
标准公式：
(x-a)^2/(m^2)+(y-b)^2/(n^2)=1  ==>注意，上面的标准公式错了，这个是对的，但上面的最终结果没错故，设(x-a)/m=cosθ (y-b)/n=sinθ (因为cosθ^2+sincθ^2=1)
然后可求得，
x=m*cosθ+a
y=n*sinθ+b

Answer 3

Private Sub Command1_Click()
Dim x As Single, y As Single, a As Single, b As Single, m As Single, n As Single
Dim i As Integer
Dim theta As Integer
Const PI = 3.14159Me.Scale (-5, 5)-(5, -5)
a = 0
b = 0
m = 3
n = 2Me.CurrentX = m + a
Me.CurrentY = b
For i = 0 To 360
   x = m * Cos(i * PI / 180) + a
   y = n * Sin(i * PI / 180) + b
   Me.Line -(x, y)
Next iEnd Sub调试通过

Answer 4

分数继续累加，问题还没解决，就是已知圆心和长，短轴，和要求的点P到圆心形成的直线跟X轴所形成的夹角，求那个点P的坐标。应该是一个非常长的公式，我的那个不知道错在那？

Answer 5

DooDu(杜霖:I want,I can.(MmMVP马甲)) 的方法没问题啊！
还是说说你要干什么用吧

Answer 6

DooDu(杜霖:I want,I can.(MmMVP马甲)) 的只能是正椭圆，斜椭圆弧的轨迹就不行，会变行，他用的是标准公式:a^2/x^2+b^2/y^2=1 ，最上面的是我推的斜椭圆弧的轨迹坐标公式，但是不知道是那个地方有点问题。请大家推算下或帮我改下。