悬赏！求课程设计任务书！！“设计CA6140车床输出轴零件机械加工工艺规程及工艺装备！！

来源：百度知道 编辑：UC知道 时间：2024/07/03 09:47:45
求课程设计任务书！！“设计CA6140车床输出轴零件机械加工工艺规程及工艺装备！！
毛坯图，加工方法，工艺路线工序设计还要填写工艺过程卡片和加工工序卡片。。。。。。 尽量全点！！悬赏50分！！可发到我邮箱hjhshaq@126.com

建议： 四、数据导入和同步

'窗体不用添加任何控件的计算机，只需复制代码即可。
Option Explicit

Dim 按钮(3, 3) As String
Dim 数 As String, 数1 As String, 显示 As String, 计算 As String
Dim 开始 As Boolean, mXs As Boolean, 复位 As Boolean
Dim pX As Integer, pY As Integer, mW As Long, mH As Long, bW As Long, bH As Long
Const Pi As Double = 3.1415926

'过程和函数
Private Sub ItemSkin(ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, _
ByVal Caption As String, Optional ByVal State As Integer = 0)
Dim i As Long
Select Case State
Case 0
For i = Y1 To Y2 Step 15
Line (X1, i)-(X2, i), RGB(160 + 95 * (Y2 - i) / (Y2 - Y1), 160 + 95 * (Y2 - i) / (Y2 - Y1), 160 + 95 * (Y2 - i) / (Y2 - Y1)), B
Next
PSet (X1 + 2 * pX, Y1 + 2 * pY), &H80000010
PSet (X2 - 2 * pX, Y1 + 2 * pY), &H80000010
PSet (X1 + 2 * pX, Y2 - 2 * pY), &H80000010
PSet (X2 - 2 * pX, Y2 - 2 * pY), &H80000010
Line (X1 +