PHầN MềM Tự Động hoá thiết kế 2.1 PHầN MềM thiết kế trên 2D
2.1.2Phần mềm VBA:
VBA, là công cụ lập trình đ−ợc tích hợp sắn trong AutoCAD trên cơ sở ngôn ngữ và môi tr−ờng lập trình của Visual Basic. Ch−ơng trình VBA có thể l−u trữ độc lập hay nhúng vào bản vẽ. Do xuất phát từ Visual Basic nên VBA trong AutoCAD là một công cụ lập trình mạnh, dễ phát triển và hiệu suất cao. Tuy nhiên, cũng nh− AutoLISP, với VBA, ng−ời dùng không thể can thiệp sâu vào bên trong AutoCAD, ví dụ nh− không thể bổ sung vào AutoCAD một đối t−ợng hình học hoặc phi hình học mới. Có tên file là: *.dvb
Minh hoạ về tạo một ch−ơng trình mới và l−u trong th− mục cài đặt của AutoCAD với tên là ACAD.DVB.
1. Khởi động AutoCAD.
2. Mở cửa sổ VBA Manager (lệnh VBAMAN). 3. Chọn New.
4. Chọn một VBA vừa đ−ợc tạo ra trong danh sách, su đó chọn Save As…
5. Trong hộp thoại Save As, chọn th− mục cài đặt AutoCAD trung mục Save in; còn trong th− mục File name nhập vào ACAD.DVB.
6. Chọn Save để l−u dự án và quay về cửa sổ VBA Manager.
Minh hoạ về tạo và thử nghiệm Macro HelloWorld.
1. Trong cửa sổ VBA Manager, chọn Macros.. để hiển thị hộp thoại
2. Chọn ch−ơng trình ACAD.DVB trong th− mục Macros in:
3. Trong mục Macros name, nhập vào tên Macro là HelloWorld
4. Chọn Creat. Màn hình VBAIDE sẽ đ−ợc hiển thị, trong cửa sổ mã lệnh đã đ−ợc tạo sẵn nh− sau:
Sub HelloWorld() End Sub
5. Thay đoạn mã lệnh trên bằng đoạn mã lệnh sau: Sub HelloWorld()
Dim strMsg As string
StrMsg = inputBox (“Nhap thong diep chao mung”, “HelloWorld”) Dim objText As AcadText
Dim pinsert (0 To 2) As double
Pinsert(0) = 50: pinsert(1) = 100: pinsert(2) = 0
Set objText = ThisDrawing.ModelSpace.AddText(strMsg, pinsert, 2.5)
ZoomExtents.
End Sub
6. Đặt con trỏ vào giữa hai dòng Su HelloWorld() và End Sub, sau đó nhấm phím F5 để thực thi thử Macro. Một hộp thoại nhỏ sẽ hiện lên yêu cầu ng−ời dùng nhập vào một thông điệp ⇒ Nhập thông điệp và nhấn OK ⇒
7. Trong màn hình của VBAIDE, chọn trình đơn File ⇒ Save để l−u tệp ch−ơng trình ACAD.DVB. Tiếp tục chọn trình đơn File ⇒ Close and Return to AutoCAD để trở về AutoCAD
2.2 PHầN MềM THIếT Kế TRÊN 3d 2.2.1 Phần mềm Autodesk Inventor: