资源描述:
《哈工大材料力学上机案例.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、土木三班10330031103200118圆截面扭转(扭矩图及校核)运行图程序PrivateSubCommandl_Click()DimTextl,Text2,Text3,Text4,Text5,Text6,Text7,Texl&Text9,Text10,Textl1AsDoubleDimwtl,wt2,wt3,Ipl,Ip2,Ip3,ql,q2,q3,JI,J2,J3,GAsDoublePicture1.Scale(-10,30)-(100,-30)Picture2.Scale(-10,30)-(100,-30)Picture1.Line(0,20)-(0,-20)Pic
2、ture1.Line(0,3)-(Textl,-3),,BPicture2.Line(0,0)-(0,Text5*10),,BFillStyle=3G=Text2/2/(1+Tex⑶IfFrame2.Visible=tureThenwtl=Text7人3*3.1416/16JIpuwJIpuw・・二経吕*n2¥/口XUIH^e:寸<6*JU9Imz7寸<8冠T9一寸-.TedlOO1XF9二91寸寸<2XU,9二9一寸二¥百UQqHp
3、mH2q@A0EoyJIJIpuwJIPUUJ・・-di三・H1XOLS2XU三-HIXULUXUSD.ZenmdSQEsgd(mqoizpupwwooqns3E>Jdqnspum41PugJIpuw=阳蟲uo=d£.6二uqe」usw=^学iuo=deu.6IRPnuuqH寸-XuHvmbjimb==><百Nmdl、D二吾*mxcH«乡/PXQJLnccb寸<(z二uxc.ou
4、xu)*9m・Enmdle<(d=xu,0=xuH)*IHXUI*9I寸「E*ZHS2MuuqHgJHH3q-s-A・寸UUIedLJIZ7寸<匕弱1決91寸【・{>-耳9二9一寸二(DX百+D'woxuuoEHubsue(0oog(oo)Qu-Te七sQdda;(OI*GXUJJSqv、£xu©XOFHO,0)uuu.eamo一d(orOOVOEOT)QWOSH七22d上qnoQS5、n1XUL寸-Xu(2*Gxu&sqv_口XUgxg(o©guuu.(0O2HOo)£□•定.mo一ddm:(0I关(gxu)sqv、pxu.91X8(0o)uuu.zesgdCQ=0)QUuoJno一d(orOHOZsuuuo.mo一d(or00-),(0Eor)QWOSHUJnmd(0900一工OEo.)3P0S—七s2d上qnoGsJdqnSPUUJ41puul・・6、£XUHS•一o)Quu・-amo-d(0今oT(oeo)Qurnammd(oeioshoeo.)=(oroogoEo,)Q3SE22d2qnoGsJdqnspuw41puw=阳蟲uopdeo.6二QqEJusw=令学1UOHdeu.6二Qqp」UQqH寸1XUHVmbjimbtxuLeHXUBs-rsH*乡_pxunccb寸<(z二uxc.OHXU)*9m・Enmdl二1XU-0HX百)*二」XUI*9一寸「E*ZHS2Msx百+【二z'e舌UDtuBssdqnspuwn^q-s-A.^tupLl:oruH
7、n3q:g>.eJdqnSPUUJJIpuw=4H型K-.1uo=deu.6二Qqp」巒・和郃・HUOHdeo.6二uqe」UMH寸-XUJLUVelbJIebtxu.euxuedl'D、9XUFH2CM、—XUFneb铝、寸