资源描述：
《哈工大材料力学课件》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。
1、为了适应公司新战略的发展，保障停车场安保新项目的正常、顺利开展，特制定安保从业人员的业务技能及个人素质的培训计划哈工大材料力学课件 HarbinInstituteofTechnology 材料力学电算大作业 课程名称： 院系：班级：作者：学号：指导教师：完成时间： 哈尔滨工业大学 圆截面杆件在扭转变形下的强度及刚度计算 一.使用说明及主要功能 在已编成的VB窗口下，首先对截面形状进行选择，确定是实心圆、空心圆环还是薄壁圆筒。第二步，进行材料常数与载荷的输入。第三步，如果截面形状选择的是实心圆，则输入实心圆直径，如果截面
2、形状选择的是空心圆环，则输入外圆直径与内园直径，如果选择的是薄壁圆筒，则输入圆筒直径和厚度。以上数据输入完成后，则可点击确定键，生成结构构型图和扭矩图，得到最大切应力，通过计算与比较，得出校核结果。 操作界面如下图： 二.程序源代码 圆截面杆件在扭转变形下的强度及刚度计算编译代码： PrivateSubCommand1_Click()目的-通过该培训员工可对保安行业有初步了解，并感受到安保行业的发展的巨大潜力，可提升其的专业水平，并确保其在这个行业的安全感。为了适应公司新战略的发展，保障停车场安保新项目的正常、顺利开展，特制定
3、安保从业人员的业务技能及个人素质的培训计划哈工大材料力学课件 HarbinInstituteofTechnology 材料力学电算大作业 课程名称： 院系：班级：作者：学号：指导教师：完成时间： 哈尔滨工业大学 圆截面杆件在扭转变形下的强度及刚度计算 一.使用说明及主要功能 在已编成的VB窗口下，首先对截面形状进行选择，确定是实心圆、空心圆环还是薄壁圆筒。第二步，进行材料常数与载荷的输入。第三步，如果截面形状选择的是实心圆，则输入实心圆直径，如果截面形状选择的是空心圆环，则输入外圆直径与内园直径，如果选择的是薄壁圆筒，
4、则输入圆筒直径和厚度。以上数据输入完成后，则可点击确定键，生成结构构型图和扭矩图，得到最大切应力，通过计算与比较，得出校核结果。 操作界面如下图： 二.程序源代码 圆截面杆件在扭转变形下的强度及刚度计算编译代码： PrivateSubCommand1_Click()目的-通过该培训员工可对保安行业有初步了解，并感受到安保行业的发展的巨大潜力，可提升其的专业水平，并确保其在这个行业的安全感。为了适应公司新战略的发展，保障停车场安保新项目的正常、顺利开展，特制定安保从业人员的业务技能及个人素质的培训计划 DimText1,Tex
5、t2,Text3,Text4,Text5,Text6,Text7,Text8,Text9,Text10,Text11AsDoubleDimwt1,wt2,wt3,Ip1,Ip2,Ip3,q1,q2,q3,J1,J2,J3,GAsDouble (-10,30)-(100,-30) (-10,30)-(100,-30) (0,20)-(0,-20) (0,3)-(Text1,-3),,B (0,0)-(0,Text5*10),,B FillStyle=3 G=Text2/2/(1+Text3) If=tureThen w
6、t1=Text7^3*/16 Ip1=*Text7^4/32 q1=Text5/wt1 J1=Text5*Text1/G/Ip1 =q1 Ifq1<=Text4Then ="安全" Else ="不安全" EndIf目的-通过该培训员工可对保安行业有初步了解，并感受到安保行业的发展的巨大潜力，可提升其的专业水平，并确保其在这个行业的安全感。为了适应公司新战略的发展，保障停车场安保新项目的正常、顺利开展，特制定安保从业人员的业务技能及个人素质的培训计划 EndIf If=tureThen wt2=Text8^3*
7、/16-Text9^4*/16/Text8 Ip2=*Text8^4/32-*Text9^4/32 q2=Text5/wt2 J2=Text5*Text1/G/Ip2 =q2 Ifq2<=Text4Then ="安全" Else ="不安全" EndIf EndIf If=tureThen wt3=2**Text11*(Text10-Text11/2)^2 Ip3=*(Text10-Text11/2)^4 q3=Text5/wt3 J3=Text5*Text1/G/Ip3 =q3 Ifq3<=Text
8、4Then ="安全" Else目的-通过该培训员工可对保安行业有初步了解，并感受到安保行业的发展的巨大潜力，可提升其的专业水平，并确保其在这个行业的安全感。为了适应公司新战略的发展，保障停车场安保新项目的正常、顺利
