摆动导杆机构VB程序.docVIP

目 录 设计任务书………………………………………...1 摆动导杆机构 ………………………………………1 二、摆动导杆机构………………………………………..2 1.数学模型的建立……………………………………...2 2.主要控件名称及其说明……………………………...4 3. 主要变量说明……………………………………….7 4.程序源代码及运行结果……………………………...9 三、小结………………………………………………….20 四、主要参考资料………………………………………22 主要控件名称及其说明 控件名称 类型 变量名 含义、功能 单位 Text1（0） Textbox 控件数组 dbll_AB 主动连架杆AB长度 mm Text1（1） dbll_CD 连杆CD长度 mm Text1（2） dbll_AC 机架AC长度 mm Text1（3） dblN 主动连架杆AB的转速 r/min txtangle Textbox —— 主动杆AB的任意角位移 ( Text3 Textbox dblsxy 运动仿真的显示比例 —— optClockWise（0） Optionsutton控件数组 Intcw 杆AB顺时针转，intcw=-1 —— optClockWise（1） 杆AB逆时针转，intcw=1 lblcurrent(0) Lable 控件数组 ——- 指定时刻杆CD的角位移 ( lblcurrent(1) 指定时刻杆CD的角速度 rad/s lblcurrent(2) 指定时刻杆CD的角加速度 rad/s2 lblcurrent(3) 显示指定时滑块b位移 m lblcurrent(4) 显示指定时刻滑块B的速度 m/s lblcurrent(5) 显示指定时刻滑块B的加速度 m/s2 Lblrealtime(0) Lable 控件数组 —— 实时显示杆CD的角位移 ( Lblrealtime(1) 实时显示杆CD的角速度 rad/s Lblrealtime(2) 实时显示杆CD的角加速度 rad/s2 Lblrealtime(3) 实时显示滑块B的位移 m Lblrealtime(4) 实时显示滑块B的速度 m/s Lblrealtime(5) 实时显示滑块B的加速度 m/s2 cmdrun CommandButton —— 运行程序 —— cmdlist CommandButton —— 显示计算结果 —— cmdDraw CommandButton —— 绘制运动曲线 —— command3 CommandButton —— 进行运动仿真 —— cmdExit CommandButton —— 退出程序 —— timer1 Timer —— 控制运动曲线的绘制速度 —— timer2 Timer —— 控制运动仿真速度 —— SSTab1 SSTab —— 提供一组选项卡显示程序运行结果 —— grddatalist MSFlexGrid —— 列表显示杆CD，滑块B的运动参数 —— picture1 Picturebox —— 显示机构示意图 —— picdraw（0） Picturebox 控件数组 —— 显示杆CD的角位移曲线 —— picdraw（1） 显示杆CD的角速度曲线 picdraw（2） 显示杆CD的角加速度曲线 picdraw（3） 显示滑块B的位移曲线 picdraw（4） 显示滑块B的速度曲线 picdraw（5） 显示滑块B的加速度曲线 picplay Piturebox —— 显示运动仿真 —— hsbspeed Hscrollbar —— 调节运动仿真速度 —— 3.主要变量说明 变量名 含义 单位 程序中 数学模型中 dbll_AB L1 主动连架杆AB长度 mm dbll_CD —— 连杆CD长度 mm dbll_AC L4 机架AC长度 mm dblN —— 主动连架杆AB r/min dblW —— 主动连架杆AB rad/min txtangle —— 主动连架杆AB的任意角位移 ( dblsxy —— 运动仿真的显示比例 —— intcw —— 杆AB顺时针转intcw=1,反之intcw=-1 —— dblF_AB (1 杆AB的角位移 ( dblF_CD (3 杆CD的角位移 ( dblW_CD (3 杆CD的角速度 rad/s dblE_CD (3 杆CD的角加速度 rad/s2 dblS_B S 滑块B的位移