Phát triển AutoCAD bằng ActiveX & VBA - Chương 12 docx

... Phát triển AutoCAD bằng ActiveX và VBA | | 2 2 8 8 9 9 2.1. Tham chiếu thư viện đối tượng ActiveX của ứng dụng khác Để lập trình truy cập tới một ứng dụng khác cần chỉ ra cho VBA ... khác. 3 Viết mã chương trình sử dụng cả đối tượng của AutoCAD và của ứng dụng khác. Đây chính là nơi diễn ra quá trình trao đổi dữ liệu. Phát triển AutoCAD bằng Activ...

Ngày tải lên: 22/07/2014, 14:21

... 3 3 1 1 4 4 | | Chương 13: Thiết kế đường đi dạo trong vườn – Một ví dụ về ActiveX/ VBA Phát triển AutoCAD bằng ActiveX và VBA | | ... hiện chương trình con này, cần chú ý rằng đường đa tuyến chưa hiển thị trên AutoCAD cho đến khi bản vẽ được cập nhật lại (sẽ thực hiện ở phần sau). Phát triển...

Ngày tải lên: 22/07/2014, 14:21

... khi tải vào bằng lệnh VBALOAD. Đoạn mã lệnh dưới đây sử dụng tệp khởi động của AutoLISP để tải VBA cũng như dự án VBA có tên là myproj.dvb Phát triển AutoCAD bằng ActiveX và VBA | | ... (defun S::STARTUP() (command "_-vbarun" "drawline") ) Tự động thực thi Macro khi tải VBA Ta có thể tự động chạy một Macro trong tệp acad.dvb bằng cách đ...

Ngày tải lên: 22/07/2014, 14:21

... rộng If msgstr = "" Then msgstr = vbCrLf & "NONE" MsgBox appName & " xdata on " & ent.ObjectName & _ ":" & vbCrLf & msgstr Next ... MsgBox "The attributes for blockReference " &_ blockRefObj.Name & " are: " & vbCrLf _ & strAttributes End Sub Phát triển AutoCAD bằng ActiveX...

Ngày tải lên: 22/07/2014, 14:21

... lệ theo không gian nơi tạo ra đối tượng Phát triển AutoCAD bằng ActiveX và VBA | | 2 2 3 3 9 9 Khi đang ở trong không gian in, AutoCAD sẽ hiển thị biểu tượng của UCS của không ... acModelSpace và khi làm việc trong đối tượng PViewport, ActiveSpace có thể Phát triển AutoCAD bằng ActiveX và VBA | | 2 2 3 3 5 5 một đối tượng Block chứa các đối tư...

Ngày tải lên: 22/07/2014, 14:21

... ", " _ & WCSPnt(1) & ", " & WCSPnt(2) & vbCrLf & _ "The UCS coordinates are: " & UCSPnt(0) & ", " _ & UCSPnt(1) & ", ... " & _ get3Dpts(2) & vbCrLf & _ get3Dpts(3) & ", " & get3Dpts(4) & ", " & _ get3Dpts(5) & vbCrLf & _ get3Dpts(6) & ",...

Ngày tải lên: 22/07/2014, 14:21

... vào. If MsgBox(" ;AutoCAD is about to load " & FileName & vbCrLf _ & "Do you want to continue loading this file?", _ vbYesNoCancel + vbQuestion) <> vbYes Then ... WithEvents của VBA. Để tạo một lớp mới và khai báo đối tượng Document với các sự kiện: 1 Trong VBA IDE, thêm một lớp: Insert  ClassModule. Phát triển AutoCAD bằng ActiveX...

Ngày tải lên: 22/07/2014, 14:21

... hay hay cỡ nhỏ. Phát triển AutoCAD bằng ActiveX và VBA | | 1 1 9 9 3 3 ("", "Flyout", "Demonstrates a flyout button", _ "OPEN", True) ’ Tạo ... ButtonType = Choose(Button.Type + 1, "Button", _ "Separator", "Control", "Flyout") msg = msg & ButtonType & ": " If Button...

Ngày tải lên: 22/07/2014, 14:21

... Double Phát triển AutoCAD bằng ActiveX và VBA | | 1 1 6 6 3 3 3. Hiệu chỉnh kích thước Cũng giống như các đối tượng đồ hoạ khác trong AutoCAD, ta có thể hiệu chỉnh kích thước bằng cách ... Ta cũng có thể thay đổi kiểu chữ liên kết với chú thích bằng cách sử dụng thuộc tính StyleName. Phát triển AutoCAD bằng ActiveX và VBA | | 1 1 6 6 5 5 đè...

Ngày tải lên: 22/07/2014, 14:21

... Tạo mới lớp "ABC" Dim layerObj As AcadLayer Set layerObj = ThisDrawing.Layers.Add("ABC") ’ Gán đường tròn và lớp "ABC" circleObj.Layer = "ABC" circleObj.Update ... 2#: center radius = 1 Phát triển AutoCAD bằng ActiveX và VBA | | 1 1 0 0 3 3 phẩy (;), dấu chấm hỏi (?), dấu phẩy (,), dấu sao (*), dấu gạch đứng (|), dấu bằng...

Ngày tải lên: 22/07/2014, 14:21