机械原理大作业一连杆传动机构分析.docVIP

机械原理大作业一 课程名称： 机械原理 设计题目： 连杆机构及其分析 院 系：机械设计制造及其自动化 班 级： 1208104 完 成 者： 郑鹏伟 学 号： 1120810416 指导教师： 林琳 刘福利 设计时间： 2014.6.3 哈尔滨工业大学 一．运动分析题目 如图1-14所示的矿石破碎机，已知各构件尺寸为：试求构件5的角位移、角速度、和角加速度。 二．机构结构分析、组成机构的基本杆组划分 1.计算机构的自由度 2.建立直角坐标系 以D为原点建立直角坐标系 :D(0,0) ，A(-300,500)，G(-730,210) 3.对机构进行结构分析： 该机构由一个RR杆组（原动件AB）和三个RRR杆组（BCD、BEC、EFG）组成，各基本杆组运动分析数学模型见下图： 三．计算编程（VB）： Private f1(3600) As Double 1杆的转角 Private xB(3600) As Double B点的 x 位移 Private yB(3600) As Double B点的 y 位移 Private vxB(3600) As Double B点的 x 速度 Private vyB(3600) As Double B点的 y 速度 Private axB(3600) As Double B点的 x 加速度 Private ayB(3600) As Double B点的 y 加速度 Private xC(3600) As Double C点的 x 位移 Private yC(3600) As Double C点的 y 位移 Private vxC(3600) As Double C点的 x 速度 Private vyC(3600) As Double C点的 y 速度 Private axC(3600) As Double C点的 x 加速度 Private ayC(3600) As Double C点的 y 加速度 Private xE(3600) As Double E点的 x 位移 Private yE(3600) As Double E点的 y 位移 Private vxE(3600) As Double E点的 x 速度 Private vyE(3600) As Double E点的 y 速度 Private axE(3600) As Double E点的 x 加速度 Private ayE(3600) As Double E点的 y 加速度 Private f3(3600) As Double 杆3的转角 Private w3(3600) As Double 杆3的角速度 Private e3(3600) As Double 杆3的角加速度 Private f5(3600) As Double 杆5的转角 Private w5(3600) As Double 杆5的角速度 Private e5(3600) As Double 杆5的角加速度 Private pi As Double Private pa As Double Private Sub Command1_Click() Dim i As Double Dim j As Long Dim RR1 As RR Dim RRR1 As RRR Dim RRR2 As RRR Dim RRR3 As RRR Set RR1 = New RR Set RRR1 = New RRR Set RRR2 = New RRR Set RRR3 = New RRR pi = 4 * Atn(1) pa = pi / 180 Picture1.DrawWidth = 1 Picture1.Scale (-20, 600)-(390, 500) Picture1.Line (-20, 0)-(390, 0) X Picture1.Line (0, 560)-(0, 480) Y Picture1.CurrentX = 10: Picture1.CurrentY = 10 Picture1.Print 主动件转角/度 X表示 Pictur