杜蘭特畢業(yè)論文

1、 . PAGE32 / NUMPAGES38俄克拉荷馬理工大學(xué)本科生畢業(yè)設(shè)計(jì)（論文）基于VB的焊接圖形系統(tǒng)的開(kāi)發(fā)與研究學(xué)院（系）： 材料學(xué)院 專(zhuān)業(yè)班級(jí)： 材料成型0803班學(xué)生： 杜蘭特 指導(dǎo)教師： 布魯克斯 學(xué)位論文原創(chuàng)性聲明本人重聲明：所呈交的論文是本人在導(dǎo)師的指導(dǎo)下獨(dú)立進(jìn)行研究所取得的研究成果。除了文中特別加以標(biāo)注引用的容外，本論文不包括任何其他個(gè)人或集體已經(jīng)發(fā)表或撰寫(xiě)的成果作品。本人完全意識(shí)到本聲明的法律后果由本人承擔(dān)。作者簽名： 年 月 日學(xué)位論文使用授權(quán)書(shū)本學(xué)位論文作者完全了解學(xué)校有關(guān)保障、使用學(xué)位論文的規(guī)定，同意學(xué)校保留并向有關(guān)學(xué)位論文管理部門(mén)或機(jī)構(gòu)送交論文的復(fù)印件和電子版，允許

2、論文被查閱和借閱。本人授權(quán)省級(jí)優(yōu)秀學(xué)士論文評(píng)選機(jī)構(gòu)將本學(xué)位論文的全部或部分容編入有關(guān)數(shù)據(jù)進(jìn)行檢索，可以采用影印、縮印或掃描等復(fù)制手段保存和匯編本學(xué)位論文。本學(xué)位論文屬于1、囗，在 年解密后適用本授權(quán)書(shū)2、不囗 。（請(qǐng)?jiān)谝陨舷鄳?yīng)方框打“”）作者簽名： 年 月 日導(dǎo)師簽名： 年 月 日目 錄TOC t 樣式1aaa,1,樣式1bbb,2,樣式1www,3 h HYPERLINK l _Toc21340 摘 要I HYPERLINK l _Toc32759 AbstractII HYPERLINK l _Toc30738 1緒論1 HYPERLINK l _Toc9201 1.1 研究背景1 HYP

3、ERLINK l _Toc31220 1.2計(jì)算機(jī)在焊接方面的應(yīng)用現(xiàn)狀2 HYPERLINK l _Toc468 2選擇合適焊接坡口和焊接順序的意義4 HYPERLINK l _Toc23233 2.1坡口形式4 HYPERLINK l _Toc5935 2.1.1對(duì)接接頭坡口4 HYPERLINK l _Toc20979 2.1.2 T型接頭坡口4 HYPERLINK l _Toc16491 2.1.3角接接頭坡口5 HYPERLINK l _Toc19237 2.2焊接坡口的作用5 HYPERLINK l _Toc13557 2.3焊接順序的作用6 HYPERLINK l _Toc6908

4、 3總體方案設(shè)計(jì)8 HYPERLINK l _Toc28851 3.1設(shè)計(jì)容與步驟8 HYPERLINK l _Toc16795 3.2用VB設(shè)計(jì)焊接圖形系統(tǒng)的特點(diǎn)與優(yōu)勢(shì)8 HYPERLINK l _Toc23658 3.2.1 VB編程介紹8 HYPERLINK l _Toc6227 3.2.2 VB6.0集成開(kāi)發(fā)環(huán)境簡(jiǎn)介9 HYPERLINK l _Toc24773 3.2.3 VB繪圖原理與特點(diǎn)10 HYPERLINK l _Toc28508 3.3程序流程框圖 PAGEREF _Toc28508 12 HYPERLINK l _Toc13958 4編程方案設(shè)計(jì) PAGEREF _Toc

5、13958 16 HYPERLINK l _Toc18474 4.1 設(shè)計(jì)窗體18 HYPERLINK l _Toc24070 4.2 程序知識(shí)18 HYPERLINK l _Toc31624 4.2.1 VB畫(huà)圖語(yǔ)句18 HYPERLINK l _Toc1908 4.2.2 bmp格式文件的保存19 HYPERLINK l _Toc32476 4.3 實(shí)例分析20 HYPERLINK l _Toc31355 5運(yùn)行結(jié)果23 HYPERLINK l _Toc18483 6結(jié)論31 HYPERLINK l _Toc10708 參考文獻(xiàn)32 HYPERLINK l _Toc9599 致 33摘要參

6、數(shù)化自動(dòng)繪圖技術(shù)在機(jī)械領(lǐng)域經(jīng)常使用，它有助于繪圖效率的提高。本程序是為繪制焊接坡口和焊接順序而開(kāi)發(fā)的程序， 主要是針對(duì)焊接過(guò)程中主要采用的焊接坡口形式和焊接順序的繪制。本文在分析專(zhuān)家系統(tǒng)應(yīng)用于焊接領(lǐng)域的基礎(chǔ)上，根據(jù)焊接工藝設(shè)計(jì)的原理，研究了焊接工藝設(shè)計(jì)的特點(diǎn)，提出了系統(tǒng)的設(shè)計(jì)思想，確定了系統(tǒng)總體框架與各模塊功能，采用面向?qū)ο蟮目梢暬幊陶Z(yǔ)言visual basic 6.0中文企業(yè)版。程序可以實(shí)現(xiàn)焊接坡口和焊接順序示意圖自動(dòng)生成。用戶(hù)只需要在對(duì)話框中輸入相關(guān)數(shù)據(jù)， 其余的繪圖工作由程序自動(dòng)完成。關(guān)鍵詞: 焊接坡口;焊接順序; VB;visual basic 6.0; 參數(shù)繪圖AbstractAu

7、tomatic parameterization Drawing technology is ofen used in machinery field ， it helps to enhance the efficiency of drawing. This procedure is drawn for welding grooves and welding sequence ， mainly on the welding process of common welding grooves and the drawing of welding sequence. Based on the an

8、alysis of the expert system used in the welding field， and on the basis of the principle of design according to the welding process， welding process of the design characteristic， this paper puts forward the design philosophy of the system， make sure the system framework and the functional modules， b

9、y using object oriented programming language the visualization of visual basic 6.0 Chinese enterprise edition. The program can realize welding grooves and welding sequence diagram automatic generation. The user need only input relevant data in the dialog， the rest of the drawing work will be finishe

10、d by the program automatically. Key words:VB;visual basic 6.0;Welding grooves ;Welding sequenceents; Parameterization Drawing1緒論1.1研究背景自從1810年俄國(guó)人發(fā)明碳弧焊接以來(lái)，焊接技術(shù)已走過(guò)了近兩百年的歷程。在世界圍，焊接技術(shù)的工業(yè)性應(yīng)用始于1900年。隨著十余種新的焊接技術(shù)的發(fā)展，焊接逐漸成為了工業(yè)領(lǐng)域的不可或缺的材料成型方法。下表列出了主要焊接方法的發(fā)明國(guó)家和年份。4表1 主要焊接方法的發(fā)明國(guó)家和年份焊接方法英文縮寫(xiě)發(fā)明國(guó)發(fā)明年份電阻焊RW美國(guó)18861900

11、氧炔氣焊OAW法國(guó)1900鋁熱焊TW德國(guó)1900焊條電弧焊MMA、SMAW瑞典1907電渣焊ESW俄國(guó)、聯(lián)19081950等離子弧焊PAW德國(guó)、美國(guó)19091953鎢極惰性氣體保護(hù)焊TIG、GTAW美國(guó)19201941藥芯焊絲電弧焊PCAW美國(guó)1926螺柱焊美國(guó)1930熔化極惰性氣體保護(hù)焊MIG、GMAW美國(guó)19301948埋弧焊SAW美國(guó)1930CO2氣體保護(hù)焊MAG、GMAW聯(lián)1953電子束焊EBW聯(lián)1956激光束焊LBW英國(guó)1970攪拌摩擦焊FSW英國(guó)1991近50年來(lái)，全球工業(yè)現(xiàn)代化進(jìn)一步促進(jìn)了焊接技術(shù)的全面創(chuàng)新和開(kāi)拓性的工程應(yīng)用。世界各工業(yè)發(fā)達(dá)國(guó)家對(duì)焊接基礎(chǔ)理論的大量深入研究，使焊接

12、成為一門(mén)獨(dú)立的、自成體系的應(yīng)用學(xué)科。焊接基礎(chǔ)理論包括焊接物理學(xué)、焊接冶金學(xué)、焊接力學(xué)與焊接控制學(xué)四大分支。焊接工程技術(shù)則包括以下容：焊接結(jié)構(gòu)材料焊接性的測(cè)定；焊接材料的研究與開(kāi)發(fā)；焊接工藝方法的試驗(yàn)研究；焊接工藝的設(shè)計(jì)；焊接電源和設(shè)備的研制；焊接過(guò)程和焊接質(zhì)量的監(jiān)控；焊接結(jié)構(gòu)的強(qiáng)度計(jì)算和斷裂分析；焊接生產(chǎn)過(guò)程的機(jī)械化和自動(dòng)化；焊件坯料的預(yù)處理；焊件的焊后熱處理；焊件的后處理與涂裝；焊件的質(zhì)量檢測(cè)與檢測(cè)方法；焊接環(huán)保和勞動(dòng)保護(hù)；焊接生產(chǎn)現(xiàn)場(chǎng)管理與焊接標(biāo)準(zhǔn)的制定等。可見(jiàn)，焊接技術(shù)領(lǐng)域已成為一個(gè)巨大的科技知識(shí)寶庫(kù)，而焊接技術(shù)本身也提升為現(xiàn)代化工業(yè)生產(chǎn)中只是密集型的先進(jìn)制造技術(shù)。1.2計(jì)算機(jī)在焊接方面

13、的應(yīng)用現(xiàn)狀從50多年前第一臺(tái)計(jì)算機(jī)問(wèn)世，到網(wǎng)絡(luò)技術(shù)的出現(xiàn)，使得各臺(tái)計(jì)算機(jī)相互聯(lián)系起來(lái)，將信息相互交流做到資源共享。由美國(guó)建立的Internet網(wǎng)，是當(dāng)前發(fā)展最快、最有成效的國(guó)際聯(lián)網(wǎng)。通過(guò)網(wǎng)絡(luò)可互發(fā)（E-mail），打國(guó)際，文件傳輸（如FTP），查詢(xún)檢索（如WWW），網(wǎng)上討論（如BBS），網(wǎng)絡(luò)通訊手機(jī)系統(tǒng)（GPRS）以與網(wǎng)上購(gòu)物等。網(wǎng)絡(luò)的強(qiáng)大功能，已深入到政治、經(jīng)濟(jì)、軍事、商業(yè)、工業(yè)、文化、教育等各個(gè)領(lǐng)域，可以稱(chēng)為人類(lèi)社會(huì)進(jìn)入信息時(shí)代的標(biāo)志。1制造業(yè)由于計(jì)算機(jī)和網(wǎng)絡(luò)引發(fā)的信息技術(shù)（IT）而發(fā)生了巨大的變革，如近年所提出的先進(jìn)制造技術(shù)（AMT），它覆蓋了計(jì)算機(jī)集成制造系統(tǒng)（CIMS），并行工程（C

14、E）、敏捷制造（Agile Manufacturing）、精益制造（LM）、虛擬制造（Virtual Manufacturing）等。11焊接技術(shù)是先進(jìn)制造技術(shù)中一個(gè)重要組成部分，它將不斷吸收高新技術(shù)的成果，如計(jì)算機(jī)、信息、電控、能源與現(xiàn)代管理等推動(dòng)向前發(fā)展。將計(jì)算機(jī)技術(shù)應(yīng)用到焊接制造中，是一項(xiàng)很有前景的系統(tǒng)工程，它不僅可以提高焊接效率，實(shí)現(xiàn)焊接模擬，更重要的它可以實(shí)現(xiàn)焊接各種工藝評(píng)定的數(shù)據(jù)管理，這樣就大大提高了焊接技術(shù)的廣泛普與，總體來(lái)說(shuō)，計(jì)算機(jī)軟件系統(tǒng)在焊接領(lǐng)域中的應(yīng)用主要有以下幾個(gè)方面：1）計(jì)算機(jī)模擬技術(shù)：包括模擬焊接熱過(guò)程、焊接冶金過(guò)程、焊接應(yīng)力和變形等。焊接是一個(gè)涉與到電弧物理、傳熱

15、、冶金和力學(xué)等學(xué)科的復(fù)雜過(guò)程。一旦焊接中的各個(gè)過(guò)程都實(shí)現(xiàn)了計(jì)算機(jī)模擬，就能夠通過(guò)計(jì)算機(jī)系統(tǒng)來(lái)確定焊接各種結(jié)構(gòu)和各種材料時(shí)的最佳設(shè)計(jì)方案、工藝方法和焊接參數(shù)。傳統(tǒng)上，焊接工藝總是要通過(guò)一系列的實(shí)驗(yàn)或根據(jù)經(jīng)驗(yàn)來(lái)確定，以獲得可靠而經(jīng)濟(jì)的焊接結(jié)構(gòu)，計(jì)算機(jī)模擬只要通過(guò)少量驗(yàn)證試驗(yàn)證明數(shù)值方法在處理某一問(wèn)題上的適用性，大量篩選工作即可由計(jì)算機(jī)完成，省去了大量的試驗(yàn)工作，從而大大節(jié)約了人力、物力和時(shí)間，在新的工程結(jié)構(gòu)與新材料的焊接方面具有很重要的意義。計(jì)算機(jī)模擬技術(shù)的水平還決定了自動(dòng)化焊接的圍。此外，計(jì)算機(jī)模擬還廣泛用于分析焊接結(jié)構(gòu)和接頭的強(qiáng)度和性能等問(wèn)題。2）數(shù)據(jù)庫(kù)技術(shù)與專(zhuān)家系統(tǒng)：用于焊接工藝設(shè)計(jì)和工藝參

16、數(shù)的選擇、焊接缺陷診斷、焊接成本預(yù)算、實(shí)時(shí)監(jiān)控、焊接CAD、焊工考試等。數(shù)據(jù)庫(kù)技術(shù)目前已經(jīng)滲透到焊接領(lǐng)域的各個(gè)方面，從原材料、焊接試驗(yàn)、焊接工藝到焊接生產(chǎn)。典型的數(shù)據(jù)庫(kù)系統(tǒng)有焊接工藝評(píng)定、焊接工藝規(guī)程、焊工檔案管理、焊接材料、材料成分和性能、焊接性、焊接CCT圖管理和焊接標(biāo)準(zhǔn)咨詢(xún)系統(tǒng)等。這些數(shù)據(jù)庫(kù)系統(tǒng)為焊接領(lǐng)域各種數(shù)據(jù)和信息管理提供了有利條件。焊接專(zhuān)家系統(tǒng)主要集中在工藝制定、缺陷預(yù)測(cè)和診斷、計(jì)算機(jī)輔助設(shè)計(jì)等方面。現(xiàn)有的焊接專(zhuān)家系統(tǒng)中，工藝選擇和工藝制定是最主要的應(yīng)用領(lǐng)域，焊接過(guò)程的實(shí)時(shí)控制是重要的發(fā)展方向。3）計(jì)算機(jī)輔助質(zhì)量控制技術(shù)（CAQ）：用于對(duì)產(chǎn)品的數(shù)據(jù)分析、焊接質(zhì)量的實(shí)時(shí)監(jiān)測(cè)等。另外，

17、計(jì)算機(jī)輔助設(shè)計(jì)/制造（CAD/CAM）在焊接加工中的應(yīng)用也日益增加，主要用于數(shù)控切割、焊接結(jié)構(gòu)設(shè)計(jì)和焊接機(jī)器人中。132選擇合適焊接坡口和焊接順序的意義根據(jù)設(shè)計(jì)或工藝需要，在焊件的待焊部位加工并裝配成的一定幾何形狀的溝槽就叫做坡口。坡口又有單面坡口和雙面坡口之分，只構(gòu)成單面焊縫（包括封底焊）的坡口叫做單面坡口，形成雙面焊縫的坡口叫做雙面坡口。焊接順序是指工件上各焊接接頭和焊縫的焊接次序。而焊接方向是指焊接熱源沿焊縫長(zhǎng)度增長(zhǎng)的移動(dòng)方向。122.1坡口形式2.1.1對(duì)接接頭坡口對(duì)接接頭是最常用的接頭形式，也是最完善的一種接頭形式。保證焊接質(zhì)量、減少焊接變形和焊接材料消耗，需把被焊工件的邊緣加工成各

18、種形式的坡口，進(jìn)行坡口對(duì)焊。根據(jù)焊件的厚度不同，有卷邊對(duì)接接頭、平對(duì)接接頭和坡口對(duì)接接頭形式。對(duì)接接頭坡口形式有I形、V形、Y形、X形、U形、雙Y形、K形、L形等。例如，鍋爐鍋筒的縱、環(huán)焊縫都是對(duì)接接頭。一般情況下，手工電弧焊焊接6 mm以下和自動(dòng)焊焊接14 mm的焊件時(shí)，采用V形坡口，V形坡口加工較方便，但焊后工件容易發(fā)生變形；鋼板厚度為1260 mm時(shí)，可采用X形坡口，X形坡口比V形坡口好，在同樣厚度下，它能減少焊著金屬量約1/2，另外，由于焊縫對(duì)稱(chēng)，焊件變形小，它主要用于大厚度以與要求變形較小的結(jié)構(gòu)中；U形與雙U形坡口的焊著金屬量更少，焊接變形也少，但這種坡口加工較復(fù)雜，一般只在較重要的

19、與板厚較大的結(jié)構(gòu)中采用，如電站鍋爐鍋筒用電弧焊焊接的環(huán)縫常采用這種形式。在工業(yè)鍋爐制造中，因受加工條件限制，一般采用V形坡口和不對(duì)稱(chēng)的X形坡口，對(duì)于小直徑鍋筒筒體，側(cè)不便用自動(dòng)焊施焊時(shí)，常采用V形坡口。152.1.2T形接頭坡口T型接頭將相互垂直的工件用（角）焊縫連接起來(lái)的接頭。這種接頭種類(lèi)較多，能承受各種方向的外來(lái)和力矩。這類(lèi)接頭應(yīng)避免采用單面角焊縫，因?yàn)榻宇^的根部有較深的缺口，其承受能力較低。14T形接頭坡口型式在焊接結(jié)構(gòu)中被廣泛采用，特別是船體結(jié)構(gòu)中，約70%的焊縫是這種接頭型式。板厚在30 mm以下時(shí)可以不開(kāi)坡口，若接頭需承受載荷，則應(yīng)按鋼板厚度和對(duì)結(jié)構(gòu)強(qiáng)度要求，可分別選用單邊V形、K

20、形或雙U形等坡口形式，保證焊透，對(duì)于工作壓力9.8 MPa的鍋爐，其鍋筒或集箱與管子進(jìn)行角焊縫連接時(shí)，則無(wú)論厚度如何都必須在管端或鍋筒、集箱上開(kāi)坡口。厚板T形接頭開(kāi)坡口的焊縫的經(jīng)濟(jì)意義較大，因?yàn)榻呛缚p的尺寸與焊角尺寸的平方成正比，用開(kāi)坡口來(lái)代替不開(kāi)坡口的角焊縫，可節(jié)省大量人力和物力。2.1.3角接接頭坡口角接接頭多用于箱型結(jié)構(gòu)，小型鍋爐中鍋筒和封頭連接就屬于這種形式，根據(jù)焊件厚度和坡口準(zhǔn)備不同，角接接頭可分為不開(kāi)坡口、單邊V形、V形以與K形4種形式。為獲得高質(zhì)量的焊接接頭，應(yīng)選擇適當(dāng)?shù)钠驴谛褪?。坡口的選擇，主要取決于母材厚度、焊接方法和工藝要求。選擇時(shí)，應(yīng)注意以下問(wèn)題：盡量減少填充金屬量；坡口

21、形狀容易加工；便于焊工操作和清渣；焊后應(yīng)力和變形盡可能小。在壓力容器的現(xiàn)場(chǎng)組焊過(guò)程中，我們會(huì)遇到平、立、橫、仰等多種焊接位置，而且焊接量大，焊工容易疲勞，為了既保證焊接質(zhì)量，又提高焊接速度，改善焊接條件，我們可以從合理地設(shè)計(jì)和選取不同參數(shù)尺寸的坡口形式入手。各帶之間環(huán)縫的焊接通常采用橫焊，這種焊接位置易產(chǎn)生焊接缺陷。為了改善橫焊位置的施焊條件，提高焊接質(zhì)量和速度，可以采用上下板邊坡口角度不等的坡口形式。由于俯橫焊和仰橫焊的施焊難度不一樣，還可以采用類(lèi)似平仰焊位置坡口深度不等的坡口形式。這種坡口的特點(diǎn)主要是：板邊坡口，可以防止焊接熔池中熔化金屬下淌，焊工操作難度減少，防止上板邊的咬邊。還可以適當(dāng)

22、增大電流，以提高焊接速度，同時(shí)，也容易保證焊接質(zhì)量，當(dāng)Hh時(shí)，其作用與平仰焊位置相似。2.2焊接坡口的作用根據(jù)設(shè)計(jì)或工藝要求，在焊件的待焊部位加工成一定幾何形狀和尺寸的溝槽，叫坡口。作用是：1)使熱源(電弧或火焰)能到達(dá)焊縫根部，保證根部焊透。2)便于操作和清理焊渣。3)調(diào)整焊縫成型系數(shù)，獲得較好的焊縫成型。4)調(diào)節(jié)基本金屬與填充金屬的比例。采用坡口焊縫的主要作用是為了保證接頭能焊透而不出現(xiàn)工藝缺陷。在設(shè)計(jì)或選擇坡口焊縫時(shí)，必須注意施焊可達(dá)性，其中主要考慮坡口角度、根部間隙、鈍邊和根部半徑等參數(shù)。為保證厚度較大的焊件能夠焊透，常將焊件接頭邊緣加工成一定形狀的坡口。坡口除保證焊透外，還能起到調(diào)節(jié)

23、母材金屬和填充金屬比例的作用，由此可以調(diào)整焊縫的性能。坡口型式的選擇主要根據(jù)板厚和采用的焊接方法確定，同時(shí)兼顧焊接工作量大小、焊接材料消耗、坡口加工成本和焊接施工條件等，以提高生產(chǎn)率和降低成本。根據(jù)GB985-88規(guī)定，焊條電弧焊常采用的坡口形式有不開(kāi)坡口（I形坡口）、Y形坡口、雙Y形坡口、U形坡口等。手工電弧焊板厚6mm以上對(duì)接時(shí)，一般要開(kāi)設(shè)坡口，對(duì)于重要結(jié)構(gòu)，板厚超過(guò)3mm就要開(kāi)設(shè)坡口。厚度一樣的工件常有幾種坡口型式可供選擇，Y型和U型坡口只需一面焊，可焊到性較好，但焊后角變形大，焊條消耗量也大些。雙Y型和雙面U型坡口兩面施焊，受熱均勻，變形較小，焊條消耗量較小，在板厚一樣的情況下，雙Y形

24、坡口比Y形坡口節(jié)省焊接材料1/2左右，但必須兩面都可焊到，所以有時(shí)受到結(jié)構(gòu)形狀限制。U型和雙面U型坡口根部較寬，容易焊透，且焊條消耗量也較小，但坡口制備成本較高，一般只在重要的受動(dòng)載的厚板結(jié)構(gòu)中采用。5生產(chǎn)壓力容器的廠商都應(yīng)該知道壓力容器焊接口對(duì)于產(chǎn)品質(zhì)量安全來(lái)說(shuō)是很重要的，對(duì)于焊接坡口的形式與設(shè)計(jì)都是有一定的要求的。在壓力容器的現(xiàn)場(chǎng)組焊過(guò)程中，我們會(huì)遇到平、立、橫、仰等多種焊接位置，而且焊接量大，焊工容易疲勞，為了既保證焊接質(zhì)量，又提高焊接速度，改善焊接條件，我們可以從合理地設(shè)計(jì)和選取不同參數(shù)尺寸的坡口形式入手。對(duì)于球罐上溫帶、下溫帶和極板拼縫等以平仰焊和近似平仰焊位置為主的焊接部件，應(yīng)在坡

25、口設(shè)計(jì)上加大平焊的工作量，減小仰焊工作量，因此，可采用不等深度的焊接坡口。采用這種形式的坡口，主要有三個(gè)作用：平焊位置施焊條件好，焊接電流可以適當(dāng)增大，增加焊接速度；電弧停留時(shí)間加長(zhǎng)，防止咬邊，且焊工操作容易，焊接質(zhì)量也可以相應(yīng)提高；仰焊位置施焊量減少，可相應(yīng)減少施焊難度，且由于坡口寬度減少，電弧橫向擺動(dòng)幅度亦相應(yīng)減少，電弧也就相對(duì)集中，焊接質(zhì)量容易保證，不易產(chǎn)生咬邊。熔化焊坡口有許多種結(jié)構(gòu)形式，而坡口加工方法是鋼材焊前準(zhǔn)備時(shí)必須考慮的措施之一。實(shí)踐證明，同一種材料采用不同的坡口形式和加工方法，焊后接頭有不同的性能特點(diǎn)和生產(chǎn)成本。因此應(yīng)根據(jù)材質(zhì)成分、工藝條件、技術(shù)規(guī)和經(jīng)濟(jì)效益等因素來(lái)選擇最佳坡

26、口型式與其加工方法。2.3 焊接順序的作用焊接順序是指工件上各焊接接頭和焊縫的焊接次序。而焊接方向是指焊接熱源沿焊縫長(zhǎng)度增長(zhǎng)的移動(dòng)方向。合理的焊接順序和方向可以控制焊接殘余應(yīng)力，在工程機(jī)械焊接過(guò)程中，焊接變形不利于結(jié)構(gòu)件制造精度的控制，從而影響機(jī)械制造的質(zhì)量，在焊接工藝正確的條件下，往往因?yàn)楹附硬僮黜樞虻腻e(cuò)誤，導(dǎo)致焊接缺陷，甚至發(fā)生不可彌補(bǔ)的損失.在焊接質(zhì)量事故中，人們往往忽略這一點(diǎn)。不同的焊接順序?qū)?gòu)件的變形影響不是很大，且構(gòu)件的應(yīng)變也主要集中在焊縫區(qū)域；不同焊接順序下構(gòu)件應(yīng)力中的拉應(yīng)力變化較大，而壓應(yīng)力變化較?。灰浴案拱鍖?duì)接焊角接焊面板對(duì)接焊外板對(duì)接焊”為順序的焊接方式下，構(gòu)件的殘余應(yīng)力最

27、小。為了減少結(jié)構(gòu)變形，合理安排焊接順序的原則是：采用對(duì)稱(chēng)焊接，在生產(chǎn)中會(huì)遇到很多結(jié)構(gòu)設(shè)計(jì)對(duì)稱(chēng)的焊件，它具有對(duì)稱(chēng)布置的焊縫。最好由成雙的焊工對(duì)稱(chēng)地進(jìn)行焊接，這樣可以使由各焊縫所能引起的變形相互抵銷(xiāo)。當(dāng)產(chǎn)品不能完全對(duì)稱(chēng)地、同時(shí)進(jìn)行焊接，可允許焊縫焊接有先有后，但在焊接順序上盡量作到對(duì)稱(chēng)，這樣能最大限度地減少結(jié)構(gòu)變形；結(jié)構(gòu)焊縫不對(duì)稱(chēng)時(shí)先焊縫少的一側(cè)，在實(shí)際生產(chǎn)中，遇到的往往是焊縫不對(duì)稱(chēng)的焊接結(jié)構(gòu)；采用不同的焊接順序，將連續(xù)焊縫改成斷續(xù)焊縫可減少焊縫和工件由于受熱而產(chǎn)生的塑性變形?；蛘卟捎貌煌暮附臃较蚝晚樞颍墒咕植亢缚p變形減小或相互抵消，從而達(dá)到減小總體變形的目的。厚板的焊接，一般要開(kāi)坡口并采用多

28、層焊或多層多道焊。多層焊和多層多道焊接頭的顯微組織較細(xì)，熱影響區(qū)較窄。前一條焊道對(duì)后一條焊道起預(yù)熱作用，而后一條焊道對(duì)前一條焊道起熱處理作用。因此，接頭的延性和韌性都比較好。特別是對(duì)于易淬火鋼，后焊道對(duì)前焊道的回火作用，可改善接頭組織和性能。對(duì)于低合金高強(qiáng)鋼等鋼種，焊縫層數(shù)對(duì)接頭性能有明顯影響。焊縫層數(shù)少，每層焊縫厚度太大時(shí)，由于晶粒粗化，將導(dǎo)致焊接接頭的延性和韌性下降。63總體方案設(shè)計(jì)3.1設(shè)計(jì)容與步驟1)研究國(guó)外計(jì)算機(jī)在焊接中應(yīng)用情況與發(fā)展趨勢(shì)。主要是各種專(zhuān)家系統(tǒng)的建立與應(yīng)用。2)掌握焊接坡口與焊接順序圖形的相關(guān)國(guó)家標(biāo)準(zhǔn)。了解焊接坡口與焊接順序圖形的制定依據(jù)與對(duì)材料焊接成形的影響。3)建立

29、基于VB的焊接坡口圖形與焊接順序圖形自動(dòng)繪制系統(tǒng)。基本要在輸入已知參數(shù)以后，完成自動(dòng)繪制各種焊接坡口與焊接順序圖形的任務(wù)。4)在自動(dòng)繪制各種焊接坡口與焊接順序圖形的基礎(chǔ)上，運(yùn)用程序設(shè)計(jì)完成焊接坡口與焊接順序圖形的給定路徑的保存，本次設(shè)計(jì)的圖形要保存為BMP位圖格式，并且可在焊接工藝規(guī)程制定系統(tǒng)中方便的調(diào)用、運(yùn)行。3.2 用VB設(shè)計(jì)焊接圖形系統(tǒng)的特點(diǎn)與優(yōu)勢(shì)3.2.1 VB編程介紹Visual Basic是一種由微軟公司開(kāi)發(fā)的包含協(xié)助開(kāi)發(fā)環(huán)境的事件驅(qū)動(dòng)編程語(yǔ)言。從任何標(biāo)準(zhǔn)來(lái)說(shuō)，VB都是世界上使用人數(shù)最多的語(yǔ)言。它源自于BASIC編程語(yǔ)言。VB擁有圖形用戶(hù)界面（GUI）和快速應(yīng)用程序開(kāi)發(fā)（RAD）系

30、統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫(kù)，或者輕松的創(chuàng)建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序。Visual Basic 所做的很多事情一點(diǎn)也不簡(jiǎn)單。它是一種強(qiáng)大的語(yǔ)言，即您所能想到的編程任務(wù)，它基本都能完成。從設(shè)計(jì)新型的用戶(hù)界面到利用其它應(yīng)用程序的對(duì)象；從處理文字圖象到使用數(shù)據(jù)庫(kù)；從開(kāi)發(fā)個(gè)人或小組使用的小工具，到大型企業(yè)應(yīng)用系統(tǒng)，甚至通過(guò) Internet 的遍與全球分布式應(yīng)用程序，都可在 Visual Basic 提供的工具中各取所需。1VB是微軟公司的一種通用程序設(shè)計(jì)語(yǔ)言，包含在Microsoft Excel、Microsoft Access

31、等眾多Windows應(yīng)用軟件種的VBA都使用VB語(yǔ)言，以供用戶(hù)二次開(kāi)發(fā)；目前制作網(wǎng)頁(yè)使用較多的VBScript腳本語(yǔ)言也是VB的子集。利用 VB的數(shù)據(jù)訪問(wèn)特性，用戶(hù)可以對(duì)包括Microsoft SQL Server和其他企業(yè)數(shù)據(jù)庫(kù)在的大部分?jǐn)?shù)據(jù)庫(kù)格式創(chuàng)建數(shù)據(jù)庫(kù)和前端應(yīng)用程序，以與可調(diào)整的服務(wù)器端部件。利用ActiveX(TM)技術(shù)，VB可使用如Microsoft Word、Microsoft Excel與其他Windows應(yīng)用程序提供的功能，甚至可直接使用VB專(zhuān)業(yè)版和企業(yè)版創(chuàng)建的應(yīng)用程序?qū)ο?。VB中的幾個(gè)常用術(shù)語(yǔ)： 工程(Project)：是指用于創(chuàng)建一個(gè)應(yīng)用程序的文件的集合。對(duì)象(objec

32、t)：可控制的某個(gè)東西，VB中主要有兩類(lèi)對(duì)象:窗體和控件。窗體(form)：應(yīng)用程序的用戶(hù)界面，即windows?？丶?control)：指的是各種按扭、標(biāo)簽、文本框等。屬性(property)：是指對(duì)象的特性，如大小、標(biāo)題或顏色。VB6.0集成開(kāi)發(fā)環(huán)境簡(jiǎn)介VB 集成開(kāi)發(fā)環(huán)境 (IDEIntegrated Developing Environment ) 由以下元素組成：1) 標(biāo)題欄用于顯示正在開(kāi)發(fā)或調(diào)試的工程名和系統(tǒng)的工作狀態(tài)（設(shè)計(jì)態(tài)、運(yùn)行態(tài)、中止態(tài)）。2) 菜單欄 用于顯示所使用的 Visual Basic 命令。3) 工具欄 在編程環(huán)境下用于快速訪問(wèn)常用命令。缺省情況下，啟動(dòng) VB后顯示

33、“標(biāo)準(zhǔn)”工具欄，附加的編輯、窗體設(shè)計(jì)和調(diào)試的工具 欄可以從“視圖”菜單上的“工具欄”命令中移進(jìn)或移出。4) 窗體設(shè)計(jì)器用來(lái)設(shè)計(jì)應(yīng)用程序的界面。啟動(dòng)VB后，窗體設(shè)計(jì)器中自動(dòng)出現(xiàn)一個(gè)名為Form1的空白窗體，可以在該窗體中添加控件、圖形和圖片等來(lái)創(chuàng)建所希望的外觀，窗體的外觀設(shè)計(jì)好后，從菜單中選擇“文件”“保存窗體”在保存對(duì)話框中給出合適的文件名（注意擴(kuò)展名），并選擇所需的保存位置確定。需要再設(shè)計(jì)另一個(gè)窗體時(shí)，單擊工具欄上的“添加窗體”按鈕即可。25) 控件（工具）箱由一組控件按鈕組成，用于設(shè)計(jì)時(shí)在窗體中放置控件。除了缺省的工具箱布局之外，還可以通過(guò)從上下文菜單中選定“添加選項(xiàng)卡”并在結(jié)果選項(xiàng)卡中添

34、加控件來(lái)創(chuàng)建自定義布局。6)彈出式（上下文）菜單在要使用的對(duì)象上單擊鼠標(biāo)右鍵即可打開(kāi)快捷菜單，其上會(huì)出現(xiàn)與當(dāng)前對(duì)象相關(guān)的經(jīng)常執(zhí)行的操作，以加快操作速度。7) 工程管理器窗口用于瀏覽工程中所包含的窗體和模塊，還可以從中查看代碼、查看對(duì)象。8) 屬性窗口是VB中一個(gè)比較復(fù)雜的窗口，其中列出了對(duì)選定窗體和控件的屬性設(shè)置值。VB中正是通過(guò)改變屬性來(lái)改變對(duì)象的特征，如大小、標(biāo)題或顏色。9) 對(duì)象瀏覽器列出工程中有效的對(duì)象，并提供在編碼中漫游的快速方法?？梢允褂谩皩?duì)象瀏覽器”瀏覽在 VB中的對(duì)象和其它應(yīng)用程序，查看對(duì)那些對(duì)象有效的方法和屬性，并將代碼過(guò)程粘貼進(jìn)自己的應(yīng)用程序。10) 對(duì)象瀏覽器右擊窗體中的

35、對(duì)象、從工程管理器中點(diǎn)“查看代碼”按鈕。11) 窗體布局窗口 Form Layout window允許使用表示屏幕的小圖象來(lái)布置應(yīng)用程序中各窗體的位置。3.2.3 VB繪圖原理與特點(diǎn)VB 提供了一整套繪圖方法，如 Print，Line，Circle等可以在程序運(yùn)行過(guò)程中繪制圖形，同時(shí)也可通過(guò) DrawStyle，DrawWidth，F(xiàn)illColor 屬性的設(shè)置可控制圖形中畫(huà)線的風(fēng)格與寬度、填充圖形顏色等。在VB中原點(diǎn)為控件或窗體的左上角，X、Y 坐標(biāo)分別向右向下遞增。當(dāng)繪制圖符時(shí)，若其他屬性已定，通過(guò) X 和 Y 坐標(biāo)可以繪出該圖符。3程序開(kāi)始程序流程框圖 焊接坡口or焊接順序坡口 順序選擇

36、坡口形式選擇坡口形式輸入?yún)?shù)（層數(shù)、道數(shù)）輸入?yún)?shù)（板厚、間隙、鈍邊、角度） 焊接坡口繪制 焊接順序繪制生成.bmp格式圖片并保存至指定位置程序結(jié)束圖3-1 程序流程框圖上圖3-1是本文所開(kāi)發(fā)的圖形系統(tǒng)的程序流程框圖。4編程方案設(shè)計(jì)4.1設(shè)計(jì)窗體界面的設(shè)計(jì)有兩步：先繪制控件，然后確定控件屬性。繪制控件：在工具箱里單擊想畫(huà)的控件，在窗體里按下鼠標(biāo)并拖曳，然后松開(kāi)鼠標(biāo)即可。確定屬性：先選中控件，然后按F4鍵或單擊工具欄上的屬性窗口進(jìn)入屬性(Properties)窗口，再在屬性窗口中找到要設(shè)置的屬性并進(jìn)行設(shè)置。常用屬性的設(shè)置1)Name屬性：對(duì)象都有名字，計(jì)算機(jī)把名字看成對(duì)象于對(duì)象之間的根本差異，因

37、此在同一窗體里不許出現(xiàn)重名的情況(除非這是一個(gè)控件數(shù)組)，且名字不得超過(guò)40個(gè)字。在簡(jiǎn)單的程序里，給控件命名不是很必要，完全可以使用控件Name屬性的缺省值。例如Text1。但在有幾十個(gè)控件的復(fù)雜窗體里，就很難區(qū)分它們。所以，VB推薦由三個(gè)小寫(xiě)字母的前綴和一個(gè)第一個(gè)字母為大寫(xiě)的描述性單詞組成的名字。例如cmdMyButton是一個(gè)命令按鈕(前綴是cmd)2)Caption屬性：Caption即標(biāo)題，是可以在對(duì)象外觀上直接看見(jiàn)的文本，可以長(zhǎng)達(dá)255字符，包括空格和標(biāo)點(diǎn)符號(hào)，比如一個(gè)叫cmdOk的命令鈕，它的Caption屬性就可以是“Ok”。 注意：并不是所有的對(duì)象都有此屬性，比如文本框、圖片框

38、、線條等就沒(méi)有。為按鈕設(shè)置熱鍵：在設(shè)置Caption屬性時(shí)，在需要加下劃線的字母前加上 “&” 符號(hào)，例如 “&File”，輸出的就是“File”，這樣就可以通過(guò)按ALT鍵和標(biāo)題上那個(gè)帶下劃線的字母來(lái)選取它了， 不必為此編任何代碼。3)Top，Left屬性：這兩個(gè)屬性決定對(duì)象的位置。只有兩種情況需要在屬性窗口里設(shè)置這兩個(gè)屬性：第一種是用戶(hù)沒(méi)有鼠標(biāo)，第二種是程序員需要十分精確地設(shè)定這兩個(gè)值。當(dāng)選中對(duì)象，單擊并拖曳它的時(shí)候，便在修改這兩個(gè)值了。4)Height，Width屬性：這兩個(gè)屬性決定了對(duì)象的大小，當(dāng)選中控件時(shí)，它周?chē)霈F(xiàn)八個(gè)小黑方塊，把鼠標(biāo)指向這些方塊，鼠標(biāo)指針將變成一個(gè)雙向的箭頭，這時(shí)按

39、下鼠標(biāo)并拖曳它，即可改變控件的大小，也就改變了Height，Width屬性。焊接坡口和焊接順序選擇界面如圖4-1圖4-1 焊接坡口和焊接順序選擇界面選擇焊接坡口形式界面如圖4-2圖4-2 選擇焊接坡口形式I型坡口（對(duì)接接頭）界面如圖4-3圖4-3 I型坡口（對(duì)接接頭）界面K型坡口（T型接頭）界面如圖4-4圖4-4 K型坡口（T型接頭）界面焊接順序選擇界面如圖4-5圖4-5 焊接順序選擇界面I型坡口（對(duì)接接頭）界面如圖4-6圖4-6 I型坡口（對(duì)接接頭）界面V型坡口（對(duì)接接頭）界面如圖4-7圖4-7 V型坡口（對(duì)接接頭）界面4.2 程序知識(shí)4.2.1 VB畫(huà)圖語(yǔ)句 使用圖形方法能使圖形設(shè)計(jì)更方便

40、，并減少程序代碼。用圖形方法創(chuàng)建圖形是在程序代碼中進(jìn)行的，繪圖效果需在運(yùn)行應(yīng)用程序時(shí)才能看到。對(duì)于界面設(shè)計(jì)中的簡(jiǎn)單繪圖，圖形方法不能代替圖形控件的作用。利用以下方法可做出各種各樣的圖形，下面簡(jiǎn)單介紹這些圖形方法的作用與使用方法。1）用Pset方法畫(huà)點(diǎn)畫(huà)出單個(gè)像素即畫(huà)點(diǎn)。畫(huà)點(diǎn)是最簡(jiǎn)單的圖形操作。用Pset方法在指定位置處畫(huà)點(diǎn)，并可以設(shè)置該點(diǎn)像素的色彩。語(yǔ)句格式：對(duì)象名 Pset（x，y）， 功能：在指定對(duì)象上的指定位置畫(huà)指定顏色的點(diǎn)。說(shuō)明：對(duì)象名指窗體或圖片框。缺省時(shí)為窗體。參數(shù) x 和 y 指定點(diǎn)的位置坐標(biāo)，是單精度參數(shù)，可以接受整數(shù)或分?jǐn)?shù)的輸人。該參數(shù)的輸人可以是任何含有變量的數(shù)值表達(dá)式。如

41、果缺省顏色參數(shù)，則將點(diǎn)設(shè)置為前景色。選擇顏色參數(shù)可以將點(diǎn)設(shè)置為指定的顏色。該參數(shù)可以引用 QBColor 函數(shù)或 RGB 函數(shù)產(chǎn)生的顏色。2）用Line方法繪制直線為了在兩點(diǎn)之間繪制一條直線，除了使用直線控件外， VB還提供了Line方法。語(yǔ)法格式：對(duì)象 Line Step （ xl ， y1 ）一 Step （ x2 ， y2 ） ，顏色 功能：在對(duì)象上的兩個(gè)指定點(diǎn)之間畫(huà)一條指定顏色的直線。說(shuō)明：對(duì)象是指窗體、圖片框等，缺省指窗體。第一個(gè) Step表示它后面的一對(duì)坐標(biāo)是相對(duì)于當(dāng)前坐標(biāo)的偏移量，第二個(gè)Step表示它后面的一對(duì)坐標(biāo)是相對(duì)于第一對(duì)坐標(biāo)的偏移量。3）用 Line方法繪制矩形語(yǔ)法格式：

42、對(duì)象 Line Step （ xl ， y1 ）一 Step （ x2 ， y2 ）， 顏色 ， BF功能：在對(duì)象上以指定的 ( x1，y1)與（x2，y2） 作為 矩形的左上角和右下角的坐標(biāo)，參數(shù) B表示要畫(huà)一個(gè)矩形，參數(shù)F是指畫(huà)一個(gè)實(shí)心的矩形。注意F與B兩個(gè)參數(shù)之間沒(méi)有逗號(hào)。用 Line方法畫(huà)矩形時(shí)，還要注意對(duì)象 FillStyle 和 FillColor 屬性的設(shè)置。 FillStyle 屬性的默認(rèn)值是1，即為透明，畫(huà)出的方框部是空的。Fillstyle 屬性值設(shè)置為 0 ，可以通過(guò) FillColor 屬性的顏色設(shè)置將矩形填充為實(shí)心。若在B參數(shù)后使用F參數(shù)（注意：沒(méi)有B參數(shù)就不能用 F

43、 參數(shù)）時(shí)，Line方法將忽略 FillColor和 FillStyle屬性。使用F參數(shù)時(shí)，矩形總是被填充為實(shí)心。4）用 Circle方法繪制圓語(yǔ)法格式： 對(duì)象.Circle Step(x，y)， ，顏色5）用Circle方法繪制橢圓只要加上一個(gè)參數(shù)就可以用 Circle方法繪制出橢圓。語(yǔ)法格式： 對(duì)象.CircleStep（x，y），顏色，縱橫比功能：橢圓兩個(gè)軸長(zhǎng)之比，即縱橫比，它決定了橢圓的形狀。如果縱橫比的值大于 1，繪制出的橢圓為細(xì)而高的形狀，如果縱橫比的值小于1，繪制出的橢圓是扁平狀，如果縱橫比等于1，就繪制出一個(gè)圓6）用Circle方法繪制圓弧與扇形圓周的一部分就是圓弧，如果從圓心

44、連接兩條直線到圓弧的兩端，就是一個(gè)扇形。用畫(huà)圓的方法Circle來(lái)畫(huà)圓弧與扇形非常容易，只要加上起始角和終止角即可。語(yǔ)法格式： 對(duì)象CircleStep（x，y），半徑，顏色起始角，終止角，縱橫比功能：從起始角按逆時(shí)針?lè)较虍?huà)圓弧直到終止角處。當(dāng)縱橫比為 1時(shí) 畫(huà)出來(lái)的是一段圓弧，當(dāng)縱橫比不等于1時(shí)，畫(huà)出一段橢圓弧。4.2.2 .bmp格式文件的保存利用保存圖片（SavePicture函數(shù)），從對(duì)象或控件（如果有一個(gè)與其相關(guān)）的Picture或Image屬性中將圖形保存到文件中。使用語(yǔ)法是：SavePicture picture， stringexpressionSavePicture語(yǔ)句的語(yǔ)法

45、包含參數(shù)和描述兩部分。Picture指的是產(chǎn)生圖形文件的PictureBox 控件或 Image 控件。Stringexpression指的是欲保存的圖形文件名。 無(wú)論在設(shè)計(jì)時(shí)還是運(yùn)行時(shí)圖形從文件加載到對(duì)象的Picture屬性，而且它是位圖、圖標(biāo)、元文件或增強(qiáng)元文件，則圖形將以原始文件同樣的格式保存。如果它是 GIF或JPEG文件，則將保存為位圖文件。Image 屬性中的圖形總是以位圖的格式保存而不管其原始格式。例如：SavePicture Me.Picture， c:test.bmp 保存窗體中的圖像SavePicture Picture1.Picture， c:test.bmp 保存pic

46、turebox控件中的圖像SavePicture Picture1.Picture， C:Documents and SettingsAdministrator桌面杜蘭特生成圖像保存位置焊接坡口.bmp4.3 實(shí)例分析下面以V型坡口（角接接頭）的焊接坡口為例來(lái)分析它的編程。輸入該焊接坡口的四個(gè)參數(shù)后，點(diǎn)擊“繪制并保存”按鈕，即可繪制出該焊接坡口并將.bmp格式的圖片保存到電腦上的指定位置。V型坡口（角接接頭）界面如圖4-8圖4-8 V型坡口（角接接頭）界面Private Sub Form_Load()Text1.Text = Text2.Text = bText3.Text = pText4.

47、Text = End SubPrivate Sub Command1_Click()PI = 3.14159266 = Val(Text1.Text) 板厚b = Val(Text2.Text) 根部間隙p = Val(Text3.Text) 鈍邊 = PI * Val(Text4.Text) / 180 坡口角度Picture1.Scale (-20， -60)-(30， 20) 設(shè)置坐標(biāo)系Picture1.DrawWidth = 4 設(shè)置坡口線寬Picture1.AutoRedraw = Truer = ( - p + b / (2 * Tan( / 2) / Cos( / 2) 設(shè)置角度

48、標(biāo)注圓弧半徑Picture1.Line (b / 2， -b / (2 * Tan( / 2)-(r * Sin( / 2)， -r * Cos( / 2) 繪制坡口Picture1.Line -(r * Sin( / 2) + 10， -r * Cos( / 2) 至坡口最右點(diǎn)Picture1.Line (b / 2， -b / (2 * Tan( / 2)-(b / 2， p - b / (2 * Tan( / 2)Picture1.Line (b / 2， p - b / (2 * Tan( / 2)-(b / 2 + 15， p - b / (2 * Tan( / 2)Picture1

49、.DrawWidth = 2設(shè)置標(biāo)注線寬Picture1.Line (r * Sin( / 2) + 10， -r * Cos( / 2)-Step(-1， 4)繪制標(biāo)注Picture1.Line -(b / 2 + 15， p - b / (2 * Tan( / 2)Picture1.Line (r * Sin( / 2) + 10， -r * Cos( / 2)-Step(10， 0)Picture1.Line (b / 2， p - b / (2 * Tan( / 2)-(r * Sin( / 2) + 20， p - b / (2 * Tan( / 2)Picture1.Line (r

50、 * Sin( / 2) + 15， -r * Cos( / 2)-(r * Sin( / 2) + 15， p - b / (2 * Tan( / 2)Picture1.DrawWidth = 3 設(shè)置標(biāo)注箭頭Picture1.Line (r * Sin( / 2) + 15， -r * Cos( / 2)-Step(-0.2， 2)Picture1.Line (r * Sin( / 2) + 15， -r * Cos( / 2)-Step(0.2， 2)Picture1.Line -Step(-0.4， 0)Picture1.Line (r * Sin( / 2) + 15， p - b

51、/ (2 * Tan( / 2)-Step(-0.2， -2)Picture1.Line (r * Sin( / 2) + 15， p - b / (2 * Tan( / 2)-Step(0.2， -2)Picture1.Line -Step(-0.4， 0)Picture1.CurrentX = r * Sin( / 2) + 11 設(shè)置標(biāo)注位置Picture1.CurrentY = - / 2Picture1.Print Picture1.DrawWidth = 4Picture1.Line (-b / 2， -b / (2 * Tan( / 2)-(-r * Sin( / 2)， -r

52、* Cos( / 2) 繪制坡口Picture1.Line -Step(-5， 0)Picture1.Line -Step(0， 35)Picture1.DrawWidth = 2Picture1.Line -Step(3， -1)Picture1.Line -(-b / 2， 15)Picture1.DrawWidth = 4Picture1.Line -(-b / 2， -b / (2 * Tan( / 2)Picture1.DrawWidth = 2Picture1.Line (b / 2， p - b / (2 * Tan( / 2)-Step(0， 10)Picture1.Line

53、(b / 2， p - b / (2 * Tan( / 2) + 5)-Step(5， 0)Picture1.Line (b / 2， p - b / (2 * Tan( / 2) + 5)-Step(-5 - b， 0)Picture1.DrawWidth = 3Picture1.Line (b / 2， p - b / (2 * Tan( / 2) + 5)-Step(2， -0.4) 設(shè)置標(biāo)注b箭頭Picture1.Line (b / 2， p - b / (2 * Tan( / 2) + 5)-Step(2， 0.4)Picture1.Line -Step(0， -0.8)Pictur

54、e1.Line (-b / 2， p - b / (2 * Tan( / 2) + 5)-Step(-2， -0.4)Picture1.Line (-b / 2， p - b / (2 * Tan( / 2) + 5)-Step(-2， 0.4)Picture1.Line -Step(0， -0.8)Picture1.CurrentX = -b / 2 - 4 設(shè)置b標(biāo)注位置Picture1.CurrentY = p - b / (2 * Tan( / 2) + 1Picture1.Print bPicture1.Line (b / 2， -b / (2 * Tan( / 2)-(r + 10

55、) * Sin( / 2)， -(r + 10) * Cos( / 2) 標(biāo)注Picture1.Line (-b / 2， -b / (2 * Tan( / 2)-(-(r + 10) * Sin( / 2)， -(r + 10) * Cos( / 2)Picture1.Circle (0， 0)， 0.7 * r， ， PI / 2 - 0.85 * ， PI / 2 + 0.85 * Picture1.CurrentX = 0 設(shè)置標(biāo)注位置Picture1.CurrentY = -r - 20Picture1.Print Picture1.CurrentX = -2 設(shè)置標(biāo)注位置Pictu

56、re1.CurrentY = -r - 20Picture1.Print Val(Text4.Text)Picture1.DrawWidth = 3Picture1.Circle (0， 0)， 0.7 * r - 0.2， ， PI / 2 - 0.85 * + 0.02， PI / 2 - 0.85 * + 0.06 設(shè)置標(biāo)注箭頭Picture1.Circle (0， 0)， 0.7 * r + 0.2， ， PI / 2 - 0.85 * + 0.02， PI / 2 - 0.85 * + 0.06Picture1.Circle (0， 0)， 0.7 * r - 0.2， ， PI /

57、 2 + 0.85 * - 0.06， PI / 2 + 0.85 * - 0.02Picture1.Circle (0， 0)， 0.7 * r + 0.2， ， PI / 2 + 0.85 * - 0.06， PI / 2 + 0.85 * - 0.02Picture1.DrawWidth = 2Picture1.Line (b / 2， -b / (2 * Tan( / 2)-Step(10， 0)Picture1.Line (b / 2 + 5， -b / (2 * Tan( / 2)-Step(0， -5)Picture1.Line (b / 2 + 5， -b / (2 * Tan

58、( / 2)-Step(0， 5 + p)Picture1.DrawWidth = 3 設(shè)置標(biāo)注p箭頭Picture1.Line (b / 2 + 5， -b / (2 * Tan( / 2)-Step(-0.2， -2)Picture1.Line (b / 2 + 5， -b / (2 * Tan( / 2)-Step(0.2， -2)Picture1.Line -Step(-0.4， 0)Picture1.Line (b / 2 + 5， -b / (2 * Tan( / 2) + p)-Step(-0.2， 2)Picture1.Line (b / 2 + 5， -b / (2 * Ta

59、n( / 2) + p)-Step(0.2， 2)Picture1.Line -Step(-0.4， 0)Picture1.CurrentX = b / 2 + 2 設(shè)置p標(biāo)注位置Picture1.CurrentY = -b / (2 * Tan( / 2) - 4Picture1.Print pSet Picture1.Picture = Picture1.Image 保存圖片格式與路徑SavePicture Picture1.Picture， C:Documents and SettingsAdministrator桌面杜蘭特生成圖像保存位置焊接坡口.bmpEnd Sub5運(yùn)行結(jié)果V型坡口（角接接頭）界面如下圖5-1 V型坡口（角接接頭）界面I型坡口（對(duì)接接頭）界面如圖5-2圖5-2 I型坡口（對(duì)接接頭）界面I型坡口（角接接頭）界面如圖5-3圖5-3 I型坡口（角接接頭）界面I型坡口（T型接頭）界面如圖5-4圖5-4 I型坡口（T