藏刊網,職稱文章發表、期刊投稿權威機構

投稿咨詢

投稿在線咨詢

專著咨詢

合著&獨著&編委

編輯在線咨詢

專利咨詢

專利申請&轉讓

編輯在線咨詢

軟著版權

軟著版權

編輯在線咨詢

在線溝通

論文&專著&專利

編輯在線咨詢

微信聊

微信掃一掃

首頁 > 建筑論文 > > 斜管沉淀池參數化繪圖的實現
斜管沉淀池參數化繪圖的實現
>2024-05-02 09:00:00



引言

隨著沉淀池在水處理中的廣泛應用,斜管沉淀池的設計也越來越重要.傳統設計過程僅因設計資料與參數的不同,在CAD 軟件中就需要重復繪制.為了提高設計效率,需對斜管沉淀池進行參數化繪圖設計.

1 參數化繪圖概述

參數化繪圖也叫參數化編程,是當前CAD 技術的研究熱點[1].其可實現設計、計算、繪圖一體化,能充分發揮CAD 準確、快速的特點[1].參數化繪圖主要適用于結構基本固定而尺寸參數變化的圖形.主要實現步驟是:確定基本參數、計算繪圖參數、設計與實現繪圖程序.

2 斜管沉淀池參數化繪圖的實現

2.1 關于斜管沉淀池

斜管沉淀池是根據淺池理論,在沉淀池中安裝大量間距很小且平行的斜板或蜂窩狀斜管的沉淀池.被處理的污水和沉降的泥砂在各沉淀淺層中相互運動并分離.功能上分為異向流、同向流和側向流三種方式.給水廠中廣泛應用側向流斜管沉淀池,污水廠中廣泛應用異向流斜管沉淀池[2].

2.2 設計思想

首先創建可視化界面,建立窗體,運行程序,將處理水量等設計參數輸入相應控件中.再建立計算和繪圖模塊.計算模塊計算的數據校核成功后傳給繪圖模塊.依據合理的尺寸數據進行繪制,并以 CAD 圖形的形式輸出.最后用 VBA 語句將模塊和窗體連接,完成參數化繪圖程序設計.

2.3 斜管沉淀池參數化繪圖的開發實例

2.3.1 窗體界面的創建

首先在主窗體中添加六個按鈕":設計資料""、設計參數""、斜管沉淀池尺寸計算""、沉淀池構造尺寸計算""、繪圖"以及"退出".窗體的創建也貫穿之后模塊中相應窗體創建,即添加相應控件實現相應的功能.如計算模塊中點擊計算按鈕實現相應數據的計算.

2.3.2 模塊的創建

\\(1\\)計算模塊:依據相關規范利用VBA 語言,編輯出斜管沉淀池各部分的計算.將每一個部分的每一步計算過程放入一個自定義函數中,由大化小,分工明確,進行相關界面的設計[3].計算出的尺寸經程序校核直至通過為止.以下為斜管沉淀池尺寸設計計算部分程序:

設計單池水量:

斜管沉淀池尺寸設計計算.txt21.text=Format \\(clsl* \\(1+rzybfb\\)/24/n /3600,"######.##"\\)

sjdcsl=Val\\(斜管沉淀池尺寸設計計算.txt21.text\\)

\\(2\\)繪圖模塊

計算模塊校核后的數據傳遞給繪圖程序模塊進行繪圖,如在Au-toCAD 中畫圖一樣,運用 VBA 進行參數化繪圖,也要先設置繪圖環境,即將不同的對象繪制在不同的圖層里[4].本軟件繪圖環境設置了"墻體"、" 標注""、標高"等圖層.系統創建圖層的代碼如下:

創建圖層:

Dim layObj As AcadLayer

Set layObj = ThisDrawing.Layers.Add\\("墻體"\\)

Set layObj = ThisDrawing.Layers.Add\\("標注"\\)

Set layObj = ThisDrawing.Layers.Add\\("中心線"\\)

載入墻體線層的center 線型

Dim ltObj As AcadLineType

Dim found As Boolean

found= False For Each Set ltObj = ThisDrawing.Linetypes.Add\\("

CENTER"\\)

ThisDrawing.ActiveLinetype = ltObj In ThisDrawing.Linetypes

If StrComp\\(entry1.name, "center", 1\\) = 0 Then

found = True

Exit For

End If

Next

On Error Resume Next

If Not \\(found\\) Then

ThisDrawing.Linetypes .Load "center", "acad.lin"

End If

myly4.Linetype = "center"

首先根據計算模塊所得數據,在 CAD 中選擇基準點進行池體繪制,之后進行內部結構的繪制.繪制過程中,由選擇基準點開始,通過記錄在程序中各個點的連接關系、坐標等信息進行繪圖,完成后以 CAD圖形的形式輸出[5].

斜管沉淀池各部分尺寸繪圖模塊編制完成后,可以選擇繪圖比例,如下代碼所示:

ptpick1=ThisDrawing.Utility.GetPoint\\(,"請拾取平面圖的插入點:"\\)

InsertX=ptpick1\\(0\\): InsertY=ptpick1\\(1\\)

bili=Val\\(確定平面圖繪圖參數.ComboBoxh1.text\\)

Select Case bili

Case 100

bi=1/100

Case 200

bi=1/200

End Select

2.3.3 斜管沉淀池參數化繪圖的實現

當窗體、計算與繪圖模塊均創建完成后,啟動設計資料與參數窗體,輸入參數,點擊按鈕啟動計算模塊,得出數據并傳遞給繪圖模塊,選擇繪圖比例,在CAD 界面拾取插入點,進行斜管沉淀池的平面圖繪制,并以 CAD 圖形的形式輸出.如圖 1所示:

3 結束語

斜管沉淀池的參數化設計軟件,將傳統設計方法改為用VBA 編程自動完成,點擊按鈕便能進行斜管沉淀池的計算及平面圖的繪制,達到設計計算與自動繪圖完美結合的目的,提高了設計效率.通過模塊的建立,軟件靈活性與實用性更強.

參考文獻

[1]李長勛.Auto CAD VBA 程序開發技術[M].北京:國防工業出版社,2004.

[2]尹士君,李亞峰.水處理構筑物設計與計算[M].化學工業出版社,2004.

[3]清源計算機工作室.AUTOCAD 工程二次開發[M]. 北京:機械工業出版社,2000.

[4]Joseph Sutphin,AutoCAD 2004 VBA:A Programmer SReference,A-Press[M],2004.

[5]老虎工作室,王鈺.用 VBA 開發 AutoCAD2000 應用程序[M].人民郵電出版社,1999.

綜合排序
投稿量
錄用量
發行量
教育界

主管:廣西壯族自治區新聞出版局

主辦:廣西出版雜志社

國際:ISSN 1674-9510

國內:CN 45-1376/G4

級別:省級期刊

中國報業

主管:中國報業協會

主辦:中國報業協會

國際:ISSN 1671-0029

國內:CN 11-4629/G2

級別:國家級期刊

中國房地產業

主管:中華人民共和國住房部和...

主辦:中國房地產業協會

國際:ISSN 1002-8536

國內:CN 11-5936/F

級別:國家級期刊

建筑與裝飾

主管:天津出版傳媒集團有限公司

主辦:天津科學技術出版社有限...

國際:ISSN 1009-699X

國內:CN 12-1450/TS

級別:省級期刊

財經界

主管:國家發展和改革委員會

主辦:國家信息中心

國際:ISSN 1009-2781

國內:CN 11-4098/F

級別:國家級期刊

文化月刊

主管:中華人民共和國文化部

主辦:中國文化傳媒集團有限公司

國際:ISSN 1004-6631

國內:CN 11-3120/G2

級別:國家級期刊

期刊在線投稿系統
上傳文件
支持上傳.doc、.docx、.pdf文件
18年國內外學術服務,發表國際文獻請認準藏刊網官網

資深編輯團隊

專業設計投入方案

投稿成功率極高

企業信譽保障

對公交易更安全

人民群眾口碑好

高效投稿流程

審稿快!出刊快!檢索快!

正規刊物承諾

無假刊!無套刊!

投稿成功!

藏刊網提醒您

1.稿件將進入人工審稿階段,審稿后會有編輯聯系您,請保持手機暢通。

2.為避免一稿多投、重刊等現象影響您的發表,請勿再投他刊。

確定

投稿失??!

藏刊網提醒您

由于網絡問題,提交數據出現錯誤,請返回免費投稿頁面重新投稿,謝謝!

確定

藏刊網收錄400余種期刊,15年誠信發表服務。

發表職稱文章,覆蓋教育期刊、醫學期刊、經濟期刊、管理期刊、文學期刊等主流學術期刊。

  投稿郵箱:cangkan@163.com

本站少量資源屬于網絡共享如有侵權請您聯系我們,將在第一時間刪除。

版權 2009-2022 版權所有:河北藏刊文化發展有限公司 工信部備案:ICP備20016223號 冀公網安備13010502002858號

91精品手机国产在线播放|欧洲亚洲精品免费二区|亚洲av日韩综合一区二区三区|精品综合久久久久久88