VB凸轮轮廓线数控加工程序设计-源代码.docVIP

八 附源程序 模块 Option Explicit Public ptx(3600) As Double 曲线存储点数组 Public pty(3600) As Double 由于存储最终输出的点 Public low As Double 数组下标 Public countnum As Integer 存储当前为第几段曲线输入的值 Public Const PI = 3.14159 Public area As Double 存储角度范围的值 Public sch As Double 总升程 Public tch As Double 输入曲线的推程 Public Huan As Double 坐标变换数据 Public Gao As Double Public a1 As String, a2 As String, a3 As String Public b1 As Double Public savetime As Double Public i As Double FrmView 主窗口 Option Explicit Dim j% Public bch As String, zbx As String, M As Integer, sd As String Privat