土木三班 1033003 110320011:圆截面扭转(扭矩图及校核)运行图选择截面形状杆件基本信息载苟输入杆件长度|100dmE: J50阿載的大小[60r实心isMPaG空心圜环.:|20阿载位置[60dmMF&取消外凰直径m:怦 内圆直径D2 :阿空右倒环離面一果栏扭矩因垠大切应力:6 9846120261校核结果:安全殲,扭矩图在耀上侧为正,下侧程序Private Sub Command l_Click()Dim Textl, Text2, Text3, Text4, Text5, Text6, Text7, Text& Text9, Text 10, Text 11 As DoubleDim wtl, wt2, wt3, Ipl, Ip2, Ip3, ql, q2, q3, JI, J2, J3, G As DoublePicture 1.Scale (-10, 30)-(100, -30)Picture2.Scale (-10, 30)-(100, -30)Picture 1.Line (0, 20)-(0, -20)Picture 1.Line (0, 3)-(Textl, -3),, BPicture2.Line (0, 0)-(0, Text5 * 10),, BFillStyle = 3G = Text2/2/(1 +Text3)If Frame2.Visible = ture Thenwtl = Text7 A 3 * 3」416/16JI pua JI puw=4H锹氐=H uoKeu.sRpn 巒■和弹・HUOHeo.6 二 QqEJ UUILL 寸 IXUJLCe-bJI zbulxQJL.e 二 XQJL edi、o 二-x 百 * 口 x百 n« 乡一 PXUFn ebZE、寸 < 6XU * 9一寸「E c 寸 < 8X占 * 9 一寸二 n Qdl 8氓占 一 9二 91 寸 I.E 決寸 < 61XUJL ■ 9 二 91 寸 I.Z * E < 匹EJL naM uoqFEm noESAEQEeijiJI PUUJJI pua ■珀 &K-・・ H uoaeu・6=uqn0SE5 ・珀娜・H uogdeo・6=QqEJ uoq・寸-X 百 Hv IJI IbH-xu.euxuF IdwHxumxun 二m.eoih -b e:寸 < 匕XQT9I寸「g丄£匸 H■三 nsoeamoklsoEno-d(N20IZPUEELUO0qns PE>」dqns purnJi pugiJI pua・^«G= H uoKeo・6IRqr! yE ■•第■・HUOaEo・6IRqEJ uuqHnV mb 七 Ebtxuyxu mdl、D 二三百 * :乂盎 n 口 乡 一 £><£ n Eb 寸 < (e、二-X胃■ 0=x百)* 9一寸-s H Ed- e<(e、sxuF,0-」xuH)¥I=xuF*9-寸I“*ZHS2M ugqFg」nl M 3£s 一>・t7a>lue」d JIP!、寸 <匕><吕关 91 寸IVH -di 9 二 9-寸-.7 cvdxqjlhum (UXU+E n
二 O—EpumuluooqnssGAydqns PUUJ =・・ H IxqL.ellx百 ==nBH- ==n=・■ n —.=.n IX 百oolx 百 ==H -X 百tx 百==n==H=・■ n吾 寸-x百(£二口禺)sqw sxu ,£XUJ>(0 ©XB gun・o」m2d(0001 HOo) gunrzanuQd dCQ;(£* (mxoJL)sqv _ 9X 百 G£xqI>(0o)oun.e 巴 no£ca;(s.三 xd(q 二0) uunoJno一 d (orOMOZo) uun 二七22d(0E,O2HOEo.)皀eos.e 巴no-d(orO2HOEor) Qgs •电n-sE 3qnoQ s< 0 0 db ddl .DM E2 ()42DI「puewwouqns 3e>」d」dqns pum±PUH・^«G= H u09d£.6IRqBqQsw ■■第■・HUO<百 u mb ji Ebtxuyxu mdl、0 二三占 * :乂盎 n 口一 口莒 n〔b寸 < (e、二-Xu ■ 0=x百)* 9 一寸IS Hc^dl二-21X百)二=x 百※ 91 寸「E * e H6XU+£> qbs=eqns pua Qs 一厨 n Rq^ASQEei UIUHH 3q:2A©EeE OWDIcogdo qns 3E>」dqns puaJI puw・・4H4KK-・・HUOKEo・6IRqn巒■■暑・・ H uoaEu・6IRqEuUMHzbHlxu.zuxu"di、D 二三占 * 5X百 H ef 一 PXOFH eb 秽、寸 < 6-xu * 91 寸一.T ZE、寸 <00-x百 * 9m・E H g mxuF、9 -、9 一 寸 _.7 寸 v 6XU ,9二 8XU n z 妄(E吾 + wzdxuuD (£二口 XUJJSqdxu ©XUJ>(0 ©X 百)oumalno一 d(002),(0o)兰27七2。
£ 宦:(£* Gx 胃)sqv'mx占.91X8(0 .0) Qun&gmQdPrivate Sub Option2_CIick()Frame2.Visible = FalseFrame3.Visible = TrueEnd SubPrivate Sub Option3_CIick()Frame2.Visible = FalseFrame3.Visible = FalseFrame4.Visible = TrueEnd Sub。