【正文】 ，單位：mmr1數(shù)字腿端圓弧半徑r1，單位：mmA數(shù)字截面面積A，單位：cm2G數(shù)字每米重量，單位：kg/mIx數(shù)字截面特性xx軸慣性矩Ix，單位：cm4Wx數(shù)字截面特性xx軸截面系數(shù)Wx，單位：cm3Sx數(shù)字截面特性xx軸面積矩Sx，單位：cm3i_x數(shù)字截面特性xx軸慣性半徑ix，單位：cmIy數(shù)字截面特性yy軸慣性矩Iy，單位：cm4Wy數(shù)字截面特性yy軸截面系數(shù)Wy，單位：cm3i_y數(shù)字截面特性yy軸慣性半徑ty，單位：cm表32 熱軋普通槽鋼、熱軋輕型槽鋼數(shù)據(jù)表結(jié)構(gòu)與說明字段名稱字段類型字段說明型號文本熱軋槽鋼型號h數(shù)字橫斷面高度h，單位：mmb數(shù)字寬度b，單位：mmtw數(shù)字腰厚度tw，單位：mmt數(shù)字平均腿厚度t，單位：mmr數(shù)字內(nèi)圓弧半徑r，單位：mmr1數(shù)字腿端圓弧半徑r1，單位：mmA數(shù)字截面面積A，單位：cm2G數(shù)字每米重量，單位：kg/mIx數(shù)字截面特性xx軸慣性矩Ix，單位：cm4Wx數(shù)字截面特性xx軸截面系數(shù)Wx，單位：cm3Sx數(shù)字截面特性xx軸面積矩Sx，單位：cm3i_x數(shù)字截面特性xx軸慣性半徑ix，單位：cmIy數(shù)字截面特性yy軸慣性矩Iy，單位：cm4Wymax數(shù)字截面特性yy軸截面系數(shù)最大值Wymax，單位：cm3Wymin數(shù)字截面特性yy軸截面系數(shù)最小值Wymin，單位：cm3i_y數(shù)字截面特性yy軸慣性半徑ty，單位：cm型材標準件數(shù)據(jù)表中的數(shù)據(jù)考慮到其數(shù)據(jù)是鋼結(jié)構(gòu)設(shè)計的參考數(shù)值，具有重要的現(xiàn)實意義。為保證數(shù)據(jù)的準確性和可靠性，型材標準件數(shù)據(jù)表中的數(shù)據(jù)根據(jù)國標規(guī)范數(shù)據(jù)而得。數(shù)據(jù)表結(jié)構(gòu)以熱軋普通工字鋼為例如圖31。在進行數(shù)據(jù)表結(jié)構(gòu)設(shè)計時考慮到型鋼組合截面，以方便型鋼組合截面數(shù)據(jù)的加入和系統(tǒng)的升級完善。第4章　型材CAD幾何圖形參數(shù)化程序設(shè)計應(yīng)用程序負責與用戶交互。當用戶修改圖形的某一尺寸時，應(yīng)用程序負責更新這一尺寸及其相對應(yīng)的圖形。圖41 熱軋槽鋼型材的3 種不同的圖形狀態(tài)在國家標準中，規(guī)定了常用型材的幾何形狀，其形狀尺寸隨所用的尺寸參數(shù)描述的變化而變化。對于某類型材的每一個幾何視圖，都需要一個幾何視圖程序來描述。圖41顯示了熱軋槽鋼型材的3種不同的圖形狀態(tài)。第5章 系統(tǒng)開發(fā)中的關(guān)鍵技術(shù) 繪圖原理任何一幅工程鋼結(jié)構(gòu)設(shè)計圖紙都是直線或曲線組成，我們可用程序?qū)崿F(xiàn)任何交互方式的繪圖功能，但是交互狀態(tài)下必須給定具體數(shù)值，本系統(tǒng)中用變量來代替數(shù)據(jù)，調(diào)用該繪圖模塊時再將變量賦值。本系統(tǒng)開發(fā)的參數(shù)化繪圖功能是直接啟動參數(shù)化繪圖模塊，在給定參數(shù)后進行繪圖。 參數(shù)化技術(shù)參數(shù)化設(shè)計是利用幾何約束來表達產(chǎn)品模型的形狀用一組參數(shù)確定約束尺寸關(guān)系，設(shè)計結(jié)果受尺寸驅(qū)動，從而能夠通過調(diào)整尺寸參數(shù)來修改設(shè)計模型，方便的創(chuàng)建一系列形狀相近的幾何圖形。參數(shù)化力法具有的特點：(1)從幾何參數(shù)化模型自動導(dǎo)出精確的幾何模塊；(2)易于修改；(3)易于擴充。 參數(shù)化繪圖的表現(xiàn)形式和基本原理參數(shù)化繪圖的原理，是將圖形的尺寸與一定的設(shè)計條件相關(guān)聯(lián)，即將圖形的尺寸看成是“設(shè)計條件”的函數(shù)。當設(shè)計條件發(fā)生變化時，圖形尺寸便會隨之得到相應(yīng)的更新。根據(jù)不同的圖形創(chuàng)建參數(shù)圖形的方法也有一些不同，最常用的幾種方法為：(1)利用程序變量驅(qū)動圖形利用VBA程序模塊中的變量描述圖形，變量可以是一個具體的數(shù)值，也可以是一個表達式，在程序設(shè)計的變量與設(shè)計模型之間建立起關(guān)聯(lián)關(guān)系，每當修改程序變量的數(shù)值，就會改變圖形的對應(yīng)尺寸。(2)利用尺寸驅(qū)動圖形在進行圖形設(shè)計時，按照自動測量的方法標注尺寸，再利用修改圖形的尺寸數(shù)值來達到修改圖形的目的。(3)利用數(shù)據(jù)表驅(qū)動圖形針對待繪圖形的結(jié)構(gòu)特點，在編寫VBA程序前，事先將與設(shè)計有關(guān)的各種數(shù)據(jù)以數(shù)表的形式存放在相應(yīng)的數(shù)據(jù)庫中，通過VBA程序建立表格數(shù)據(jù)與設(shè)計模型之間的關(guān)聯(lián)關(guān)系，通過訪問不同表中的數(shù)據(jù)記錄達到改變幾何圖形的目的。 (4)利用用戶元素驅(qū)動圖形對于具有確定幾何形狀特征的圖例，可用VBA程序?qū)⑵湓O(shè)計成具有單一圖案特性，在需要時能直接引用的元素圖形。這種方法適合于描述三維實體。 繪圖方法系統(tǒng)中繪圖主要是繪制直線段和圓弧段，所以圖形的繪制方法就是本系統(tǒng)中直線段和圓弧段的繪制方法。(1)本系統(tǒng)中直線畫法采用兩點確定直線法：Dim Lineobj As AcadLineSet Lineobj = (spnt, epnt)其中spnt， epnt分別為起點、終點坐標數(shù)組。(2)圓弧采用三點確定圓弧法：已知圓弧圓心、起點、終點，即可確定圓弧法：r = ((StartPoint(0) Centerp(0)) ^ 2 + (StartPoint(1) Centerp(1)) ^ 2) ^ a1 = (Centerp, StartPoint) a2 = (Centerp, EndPoint) Set AddArc3P = (Centerp, r, a1, a2)其中Centerp、StartPoint、EndPoint分別為圓弧的圓心、起點、終點坐標數(shù)組。根據(jù)上述的繪圖函數(shù)，我們采用確定截面各段直線段的端點、圓弧段的圓心及端點作為截面繪制的控制點。 元件截面控制點算法在鋼結(jié)構(gòu)基本元件(型鋼)三面圖的繪制過程，主要是確定各段線段或圓弧的控制點(端點、圓心等)的坐標。關(guān)于控制點坐標的確定，主要是通過截面圖形的幾何關(guān)系通過幾何算法得到的。 橫斷面圖控制點的確定以工字鋼為例。具體分析過程如下：圖53中、、、、為工字鋼各直線段、圓弧段的端點，4為工字鋼的斜直線段，其斜率和通過點在圖52中有明確的標注。對結(jié)構(gòu)圖分析可得：共有8條直線，8個圓弧組成。8條直線有16個控制點，而8個圓弧有16個端點控制點和8個圓心控制點，直線的控制點恰是圓弧的端點控制圖53　工字鋼截面分析結(jié)構(gòu)圖圖52　工字鋼幾何尺寸圖注：h：高度；b：腿寬度；d腰厚度；t平均腿厚度；r內(nèi)圓弧半徑；r1腿端圓弧半徑點。8條直線的一部分控制點通過截面的幾何關(guān)系就可以求得。工字鋼橫斷面為幾何對稱圖形只要確定點、和圓弧的圓心坐標，即可通過對稱關(guān)系確定其余所有控制點的坐標。通過上述分析我們的任務(wù)就是確定上述點坐標的確定。首先用戶輸入點坐標賦予基準點，直線1已知斜率和通過點，并知道圓弧通過點、并且與直線相交與地點。點坐標的確定：與上述分析可得把直線1沿與直線1垂直方向向上平移r1(圓弧①⑩的半徑)距離，得直線11。再以為圓心，r1位半徑作圓，與直線11有兩個交點取x坐標大于點x坐標的交點。該交點即為圓弧的圓心，再以該交點為圓心，r1位半徑作圓，與直線1相切，只有一個交點，該交點即為控制點。同理分析可確定點、及圓弧的圓心的坐標。再根據(jù)關(guān)于XX、YY軸對稱的關(guān)系可以確定各控制點的坐標。通過上述分析，進行計算機程序設(shè)計：確定已知直線(4)的直線方程(K、C)，確定已知直線沿垂直方向平移所求圓弧半徑距離的直線方程XY，以已知點為圓心所求圓弧半徑為半徑作圓，求出于直線XY的交點，通過條件判斷出所求圓弧的圓心，再以圓心為圓心所求圓弧半徑為半徑作圓，與已知直線相切，求出切點的坐標。圓心和切點的即為所求的圓弧控制點。程序如下：39。直線方程確定既是直線斜率、截距的確定。39。圓心直線方程的確定，k1為直線的斜率，(x1，y1)為已知直線通過點坐標。C1為已知直線的截距。Public Function dingzx(k1 As Double, x1 As Double, y1 As Double) c1 = y1 k1 * x1 If Abs(c1) Then c1 = 0End Function39。確定平移后直線方程，k c1同上， r為圓弧半徑，c2位平移后直線截距。Public Function dingyxx(k1 As Double, c1 As Double, r As Double) Dim xx As Double, yy As Double xx = r * Sin(Atn(Abs(k1))) yy = r * Cos(Atn(Abs(k1))) 39。Sin(Atn(Abs(k1)) + 2 * Atn(1)) c2 = c1 + r / Cos(Atn(Abs(k1))) If Abs(c2) Then c2 = 0 39。c = k1 * xx + yy + c1End Function39。直線與圓弧的交點計算，ind為1即為求圓弧圓心，否則是求圓弧控制點Public Function hujiao(k1 As Double, c11 As Double, x01 As Double, y01 As Double, r As Double, ind As Integer) Dim dn As Double, en As Double, fn As Double, nn As Double Dim xj1 As Double Dim yj1 As Double Dim xj2 As Double Dim yj2 As Double dn = 1 + k1 * k1 en = k1 * c11 x01 k1 * y01 fn = c11 * c11 2 * c11 * y01 + y01 * y01 + x01 * x01 r * r nn = en * en dn * fn If Abs(nn) Then nn = 0 If nn 0 Then 39。有兩個交點 xj1 = (en + Sqr(nn)) / dn: yj1 = k1 * xj1 + c11 xj2 = (en Sqr(nn)) / dn: yj2 = k1 * xj2 + c11 If xp xj1 And xj1 xp + b Then xj = xj1: yj = yj1 If xp xj2 And xj2 xp + b Then xj = xj2: yj = yj2 ElseIf nn = 0 Then 39。 只有一個交點 xj = en / dn: yj = k1 * xj + c11 Else圖54　截面俯視圖、側(cè)視圖結(jié)構(gòu)分析圖 39。沒有交點 Exit Function End If If ind = 1 Then x0 = xj y0 = yj End IfEnd Function 俯視圖、側(cè)視圖控制點的確定如圖54，該截面圖像對于橫幅面圖來說是結(jié)構(gòu)是簡單的。只有直線段沒有圓弧段。用戶輸入點坐標賦予點①、②。而點⑥、⑦、⑧是在直線①⑥上的，直線①⑥垂直直線①②，而直線①②是已知的，從而可以求出直線①⑥的方程。根據(jù)截面的幾何關(guān)系從而可以確定點⑥、⑦、⑧。同理確定點③、④、⑤。 ADO與SQL技術(shù)本系統(tǒng)中使用ADO技術(shù)進行數(shù)據(jù)庫訪問，使用SQL語句進行數(shù)據(jù)的檢索、添加、修改等。ADO與SQL技術(shù)是系統(tǒng)應(yīng)用程序和外部標準型材數(shù)據(jù)庫聯(lián)系的橋梁，是系統(tǒng)的關(guān)鍵技術(shù)?！DO技術(shù)在使用ADO技術(shù)以前，首先要在VBA中的工具中點“引用”，選擇Microsoft ActiveX Data Objects Library。通過ADO編寫程序?qū)ν獠繑?shù)據(jù)庫進行操作(讀或?qū)憯?shù)據(jù)庫)時要進行以下幾步簡單的操作：(1)建立到數(shù)據(jù)庫的連接Dim ConnectString As String, DataSourceStr As StringSet conn = New DataSourceStr = 39。數(shù)據(jù)庫路徑ConnectString=Provider=。Data Source= amp。 DataSourceStr 39。 連接數(shù)據(jù)庫字符串 ConnectString 39。連接數(shù)據(jù)庫(2)數(shù)據(jù)庫的查詢首先把要查詢的條件賦給SQLSQL=select * from * Where *Set rest = New SQL, conn, adOpenKeyset, adLockOptimistic 39。打開記錄集(3)數(shù)據(jù)庫的關(guān)閉　SQL技術(shù) SQL的基本操作——數(shù)據(jù)庫的相關(guān)操作(1)如何創(chuàng)建數(shù)據(jù)庫使用 Create Database 創(chuàng)建數(shù)據(jù)庫Create Database 語名的語法形式如下：Create Database database_name[On {[Primary](Name=logical_file_name, Filename=39。os_file_name39。 [,Size=size][,Maxsize=max_size]}[,...n]][Log On}(Name=Logical_name,Filename=39。os_file_name39。[,Size=size])}[,...n]][For Restore]Name：該選項指定數(shù)據(jù)庫的邏輯名字，這是在SQL Server 系統(tǒng)中使用的名稱，是數(shù)據(jù)庫在SQL Server 中標識符。Filename：該選項用來指定數(shù)據(jù)庫所在文件的操作系統(tǒng)文件名稱和路徑。Size：該選項用來指定數(shù)據(jù)