【正文】 成三維模型 () On Error Resume Next Dim center1(2) As Double Dim center2(2) As Double Dim center3(2) As Double Dim center4(2) As Double Dim center5(2) As Double Dim center6(2) As Double Dim center7(2) As Double Dim center8(2) As Double Dim center9(2) As Double Dim center10(2) As Double Dim center11(2) As Double Dim center12(2) As Double Dim center13(2) As Double Dim center14(2) As Double Dim center15(2) As Double Dim center16(2) As Double Dim center17(2) As Double Dim center18(2) As Double Dim centerTem(2) As Double Dim centerTem1(2) As Double Dim rotatePt1(0 To 2) As Double Dim rotatePt2(0 To 2) As Double 第 44 頁 共 65 頁 Dim rotateAngle As Double Dim radius As Double Dim RotTem As Double 建模 部分 代碼： 機(jī)構(gòu) 機(jī)構(gòu) Dim newdirection(0 To 2) As Double 39。 第 40 頁 共 65 頁 三維實(shí)體造型。 第 32 頁 共 65 頁 結(jié)果曲線顯示生成部分代碼如下： Private Sub Command1_Click() 39。原點(diǎn)坐標(biāo) XE = LOE * Cos(β): YE = LOE * Sin(β) 39。 (3)創(chuàng)建新的窗體，命名為 窗口運(yùn)動 分析。 第 22 頁 共 65 頁 參數(shù)分析： 序號 參數(shù)名 含義 初值 類型 1 LOA OA 桿長 6 長度（ mm） 2 LAB AB 桿長 15 長度（ mm） 3 LBC BC 桿長 30 長度（ mm） 4 LCD CD 桿長 40 長度（ mm） 5 LEF EF 距離 5 長度（ mm） 6 LDF DF 距離 15 長度（ mm） 7 H 如圖所示 58 長度（ mm） 8 LX BC 到 Y 軸距離 5 長度 （ mm） 9 ω OA 旋轉(zhuǎn)角速度 3 角速 度（ r/min） 10 LDQ DQ 長 40 長度（ mm） 11 β 1 如圖所示 35 角 度（ 度 ） 12 LOE OE 距離 40 長度（ mm） 表 1：參數(shù)分析 第 23 頁 共 65 頁 編程過程 1 系統(tǒng)環(huán)境 ： 操作系統(tǒng)： Microsoft Windows 7 Ultimate 軟件： Microsoft Visual Basic 中文版 AutoCAD 2021 Simplified Chinese 2 本程序?qū)⒂?7 個窗口組成，其中包括程序 使用說明窗口、參數(shù)設(shè)置窗口、封面窗口、結(jié)束窗口、三維仿真窗口、運(yùn)動分析窗口、主菜單窗口。用 VB 進(jìn)行二次開發(fā)時先確定流程圖，根據(jù)流程圖進(jìn)行編程，調(diào) 試程序保證程序能夠運(yùn)行，并且達(dá)到進(jìn)行仿真的目的，這樣就完成了設(shè)計(jì)的主要內(nèi)容，之后再對程序界面 進(jìn)行 優(yōu)化處理使之更加人性化。 5 設(shè)計(jì)說明書：不少于 萬字。總的來說進(jìn)行運(yùn)動仿真其結(jié)果的意義有 :首先機(jī)構(gòu)模型采用三維實(shí)體造型 ,仿真比二維線條直觀逼真。 VB 對 AutoCAD 的仿真技術(shù) 計(jì)算機(jī)仿真技術(shù)的概念及意義 計(jì)算機(jī)仿真技術(shù) 是 利用計(jì)算機(jī)科學(xué)和技術(shù)的成果建立被仿真的系統(tǒng)的模型，并在某些實(shí)驗(yàn)條件下對模型進(jìn)行動態(tài)實(shí)驗(yàn)的一門綜合性技術(shù)。產(chǎn)生一個新的選擇集需要兩個步驟： (1)使用選擇集集合對象 SelectionSets 的 Add 方法，增加一個選擇集； (2)使用實(shí)體選擇方法增加選擇集的元素。 Automation 高級技術(shù) Utility 對象主要負(fù)責(zé)交互輸入、部分幾何計(jì)算及類型轉(zhuǎn)換功能。 3． Document 對象 AutoCAD 屬性的 Document 對象是進(jìn)行圖形編輯的最高層對象。 Utility 對象也是 Document 對象的子對象，它的主要功能是進(jìn)行交互輸入和類型轉(zhuǎn)換。一些 圖形對象的典型特征可以通過對象屬性進(jìn)行修改，例如 Color， LineType 和 Layer 等，另外一些特殊的屬性依賴于對象類型，例如 Radius， Center第 15 頁 共 65 頁 和 Area 等。 ModelSpace 和 PaperSpace 屬性可存取圖形對象，而非圖形對象可以通過 DimStyles， Layers， LineTypes， TestStyles， ViewPorts和 Views 等存取。允許對象之間通過一定的接口相互通訊，并以客戶 /服務(wù)器的方式進(jìn)行控制。 ActiveX Automation 由客戶程序和服務(wù)器程序組成，客戶程序是操縱者與控制者，服務(wù)器程序是被控制者，它包含了一系列的暴露對象。一個應(yīng)用程序成為目標(biāo)或源，沒有特殊的差別，只是所擔(dān)的任務(wù)的不同。 10．聯(lián)機(jī)幫助功能 在 VB 中利用幫助菜單和 F1 功能鍵用戶可隨時方便地得到所需要幫助信息 VB 幫助窗口中顯示了有關(guān)舉例代碼通過復(fù)制、粘貼操作可獲取大量舉例代第 10 頁 共 65 頁 碼為用戶學(xué)習(xí)和使用提供方便 ?？捎捎脩舨僮饔|發(fā)也可以由系統(tǒng)或應(yīng)用觸發(fā)例如單擊個命令按鈕就觸發(fā)了按鈕 Click(單擊 )事件該事件中代碼就會被第 9 頁 共 65 頁 執(zhí)行，若用戶未進(jìn)行任何操作 (未觸發(fā)事件 )則就處于等待狀態(tài)整個應(yīng)用就是由彼此獨(dú)立事件過程構(gòu)成。 2021穩(wěn)中求變的新版本 —— Visual 2021。 由于 Windows 的推出， Windows 已經(jīng)充分獲得了用戶的認(rèn)可， Windows開發(fā)也進(jìn)入一個新的時代。 Basic 實(shí) 際 上 是 一 個 短 語 的 縮 寫 ， 這 個 短 語 就 是 Beginners39。 AutoCAD 的二次開發(fā) AutoCAD為各行各業(yè)的 CAD專業(yè)人士提供了功能及其強(qiáng)大的應(yīng)用開發(fā)平臺和豐富的開發(fā)和定制工具，通過開放式體系結(jié)構(gòu)， AutoCAD 允許用戶和第三方軟件開發(fā)商根據(jù)各自的需求來改進(jìn)和擴(kuò)充許多功能，實(shí)現(xiàn)對 AutoCAD 的定制和開發(fā)，從而開發(fā)出適合其專業(yè)領(lǐng)域的 CAD 應(yīng)用系統(tǒng)，使 AutoCAD 更加符合用戶的需要。 電子工業(yè)：印刷電路板設(shè)計(jì)。 （ 5） 圖層管理功能 圖形對象都位于某一圖層上，可設(shè)定圖層顏色、線型、線寬等特性。 現(xiàn)在最新的版本為： AutoCAD 2021 2021 年 4 月中旬推出。動態(tài)圖塊的操作 。 13. AutoCAD ： ,增加了 AME(Advanced Modeling Extension),但與 AutoCAD 分開銷售 。 5. AutoCAD ： ,圖形繪制及編輯功能增加 ,如 :MSLIDE VSLIDE DXFIN DXFOUT VIEW SCRIPT 等等 .至此 ,在美國許多工 廠和學(xué)校都有 AutoCAD拷貝。當(dāng)時 Versa CAD 是專業(yè)的 CAD 制作公司，所開發(fā)的 CAD 軟件功能強(qiáng)大，但由于其價格昂貴，故不能普遍應(yīng)用。 (2)有強(qiáng)大的圖形編輯功能。 第 2 頁 共 65 頁 2 AutoCAD 的相關(guān)知識 AutoCAD 的 簡介 隨著現(xiàn)代工業(yè)文明的發(fā)展，越來越多的企業(yè)對工業(yè)產(chǎn)品的外形和內(nèi)部結(jié)構(gòu)的要求越來越高，產(chǎn)品更新的速度也越來越快，傳統(tǒng)的手工制圖已經(jīng)不能滿足現(xiàn)代企業(yè)的要求。 VB（ Visual Basic） 是目前開發(fā) windows 應(yīng)用程序最為迅速、簡捷的程序設(shè)計(jì)語言，具有功能強(qiáng)大、易于掌握的特點(diǎn)，能夠直接用它進(jìn)行 Word、 Excel 和 AutoCAD二次開發(fā)。 AutoCAD 是目前微機(jī)上應(yīng)用最為廣泛的通用的交互式計(jì)算機(jī)輔助繪圖與設(shè)計(jì)軟件包。 用 VB 進(jìn)行 AutoCAD 二次開發(fā)，是 AutoCAD R14 以后的一種新技術(shù)，我們可以用 VB 語 言編程，將 AutoCAD 當(dāng)成自己 VB程序中的一個圖形窗口，對其進(jìn)行打開、繪圖、編輯、打印、關(guān)閉等操作，十分方便。 AutoCAD 具有良好的用戶界面，通過交互菜單或命令行方式便可以進(jìn)行各種操作。 (5)支持多種硬件設(shè)備。因此，該CAD 軟件升級迅速。 8. AutoCAD ： , Autolisp 有了系統(tǒng)化語法 ,使用者可改進(jìn)和推廣 ,出現(xiàn)了第三開發(fā)商的新興行業(yè) ,五張 360K 軟盤。 16. AutoCAD ： ,適應(yīng) Pentium 機(jī)型及 Windows95/NT 操作環(huán)境 ,實(shí)現(xiàn)與 Inter 網(wǎng) 絡(luò)連接 ,操作更方便 ,運(yùn)行更快捷 ,無所不到的工具條 ,實(shí)現(xiàn)中文操作。貼齊到圖中的圖形 。 AutoCAD 提供了正交、對象捕捉、極軸追蹤、捕捉追蹤等繪圖輔助工具。 （ 8） 數(shù)據(jù)交換 AutoCAD 提供了多種圖形圖像數(shù)據(jù)交換格式及相應(yīng)命令。 Autodesk 開發(fā)了行業(yè)專用的版本和插件 ： 在機(jī)械設(shè)計(jì)與制造行業(yè)中發(fā)行了 AutoCAD Mechanical 版本。 3 VB 的相關(guān)知識 第 7 頁 共 65 頁 VB 的簡介 VB是 Visual Basic 的簡稱，是由美國微軟公司于 1991年開發(fā)的一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高級程序設(shè)計(jì)語言，可用于開發(fā) Windows 環(huán)境下的各類應(yīng)用程序。 BASIC 是微軟的起家產(chǎn)品，微軟當(dāng)然不忘了這位 功臣。 Visual Basic 推出沒幾個月，微軟就發(fā)布了新版本的 Visual Basic 第 8 頁 共 65 頁 ，可以看出 VB 這時候旺盛的生命力。 VB 的特點(diǎn) 1． 面向?qū)ο? VB采用了面向?qū)ο笤O(shè)計(jì)思想，它基本思路是把復(fù)雜的設(shè)計(jì)問題分解為多個能夠完成獨(dú)立功能且相對簡單的對象集合。 5．強(qiáng)大數(shù)據(jù)庫訪問功能 VB利用數(shù)據(jù) Control 控件可以訪問多種數(shù)據(jù)庫 VB 6． O 提供 ADOControl控件不但可以用最少代 碼實(shí)現(xiàn)數(shù)據(jù)庫操作和控制也可以取代 DataControl控件和 RDOControl 控件 。而 VB支持強(qiáng)大的 DDE 功能和 ActiveX 技術(shù)，提供了在 Windows 操作系統(tǒng)下開發(fā)功能強(qiáng)大的應(yīng)用程序的最快最簡單的途徑。 Active Automation 技術(shù) ActiveX 技術(shù)來源于 OLE(Object Linking and Embedding)技術(shù)。方法是自動化對象的一些函數(shù)，它們是提供給客戶程序的外部公共成員函數(shù)。(對 是“工程 \引用”菜單 )。 3．圖形對象 AutoCAD 中的圖形對象也被稱為實(shí)體，是圖形的可見對象。它們的父類是 Document 對象的對象集合。將 Application 對象與 AutoCAD 鏈接是為 AutoCAD 開發(fā) ActiveX Automation 應(yīng)用程序的第一步工作。第 17 頁 共 65 頁 這兩個對象可分別由 Document 對象的屬性 ModelSpace 和 PaperSpace。標(biāo)準(zhǔn)類型 Integer、 Real、 String 和 Point。塊包括兩種：一種塊是外部文件，使用塊引用的方法加入到圖形文件中；另一種是文件內(nèi)部塊，該塊的定義包含在當(dāng)前圖形中。當(dāng) 實(shí)際科研中，為減少實(shí)驗(yàn)次數(shù)，有目的地進(jìn)行試驗(yàn)，或系統(tǒng)試驗(yàn)比較困難至無法實(shí)現(xiàn)時，仿真技術(shù)就成為一項(xiàng)有利的工具。 AutoCAD 作為廣泛使用的工程繪圖軟件 ,不僅具有很強(qiáng)的圖形處理能力 ,而且提供了豐富的二次開發(fā)工具。 具體設(shè)計(jì)機(jī)構(gòu) 參數(shù) ： 已知參數(shù)： LAB 、 LBC[( ~) LAB] 、 H[(~2) OE]、 L[( ~ ) LAB]、齒輪 半徑 R1=R5 [( ~ ) LAB]、β [35 ~ 50 o]、偏心輪半徑 R5′ [(~ )R5]、偏心距 EF[(~ ) R5′ ]、滾子半徑 RD [ ( ~ ) R5′ ]、行程速比系數(shù) K、 LCD [( ~)(L+|xE|)] 、主軸轉(zhuǎn)速 n1[25~200 r/min]。 圖形及參數(shù) 的 分析 圖 3 是本設(shè)計(jì)的機(jī)構(gòu)尺寸圖： 圖 3 尺寸圖 第 21 頁 共 65 頁