曲线任意里程坐标正反算(VB6.0)

标签：工程测量规范,工程测量技术, 曲线任意里程坐标正反算(VB6.0),http://www.gong66.com
              Txt1.Text = Txt1.Text + Str(wzb(1)) + "  " + Str(wzb(2)) + Chr(13) + Chr(10)
              For k = 1 To 3
                 Txt1.Text = Txt1.Text + Str(jgb(k)) + Chr(13) + Chr(10)
              Next k
              Txt1.Text = Txt1.Text + Chr(13) + Chr(10)
              Exit For
           End If
        Next j
   Next i

End Sub

Private Sub Cmd3_Click()
  End
End Sub

上一页  [1] [2] [3] 

，曲线任意里程坐标正反算(VB6.0)