2016-07-14 2 views

답변

0

꼭 필요한 것은 아니지만 (0.1, 0) 및 (0.2, 0)에 새 점을 만들고 평행선을 그릴 필요가있는 점을 얻기 위해 접선의 기울기 인수 만 사용하면됩니다. .

Dim A = New Point(120, 80) 
    Dim k As Double = 0.5 

    Dim kx = 1.0 
    Dim ky = kx * k 

    Dim A1 = New Point(A.X + kx * 30, A.Y - ky * 30) 

    ' Line at 0.1 
    Dim B = New Point(110, 100) 
    Dim B1 = New Point(B.X + kx * 30, B.Y - ky * 30) 

    ' Line at 0.2 
    Dim C = New Point(120, 100) 
    Dim C1 = New Point(C.X + kx * 30, C.Y - ky * 30) 
+0

내 곡선은 데이터베이스의 형태로 나타나며 "Me.SS.Series (0) .Points.AddXY (xPt, yPt)"함수로 그려집니다. 여기서 xPt와 yPt는 데이터베이스에서옵니다. 이제 탄젠트는 최대 값의 10 %와 60 %를 표시하여 데이터베이스 파일에 의해 플롯됩니다. 또한 내 0.1과 0.2 라인은 x1과 y1 값을 고정했지만 내 라인을 플로팅하기위한 x2와 y2 값을 계산할 수 없다. –

+0

그래서 시작점과 끝점이 접한다. 그러면 위의 샘플을 사용할 수 있고 k를 계산해야한다. (y2-y1)/(x2-x1) 여기서 x1, y1 및 x2, y2는 접선의 시작점과 끝점입니다. –

+0

귀하가 진술 한대로 k 값을 계산했습니다. 내 첫 번째 포인트는 0.1과 0.2 라인이 각각 (0.1,0)과 (0.2,0)으로 값을 가지지 만 나의 엔딩 포인트는 고정되어 있지 않으므로 그걸 어떻게 할 것인가 –

관련 문제