Chuyển đến nội dung
Diễn đàn CADViet
Đăng nhập để thực hiện theo  
nmc1988

Hỏi - Mình có thể tạo 1 chương trình độc lập để vẽ tự động Autocad

Các bài được khuyến nghị

Mình thấy khi lập trình vẽ tự động cho AutoCad thì thường dùng cái VBA có sẵn của AutoCad

Nhưng giờ mình muốn dùng Visual Studio để làm 1 chương trình độc lập, để nó vẽ tự động ( giống như là sử dụng AutoCad type Library trong Excel), vậy thì mình phải làm thế nào:(. Kiến thức mình có hạn, mong mọi người giúp đỡ

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Cả mục to đùng mà chẳng chịu đọc gì cả? :cheers:

 

http://www.cadviet.com/forum/index.php?showforum=151

 

Em đã tạo được chương trình để mở AutoCad từ VB.net nhưng mà một số lệnh của nó không giống như VB thì phải

 

Em không khai báo Acadline như VB được mà em phải làm thế này

 

Dim objAcApp As Autodesk.AutoCAD.Interop.AcadApplication

Dim objLine As Autodesk.AutoCAD.Interop.Common.AcadLine

Dim Diem1(0 To 2) As Double

Dim Diem2(0 To 2) As Double

 

Diem1(0) = Val(T1.Text)

Diem1(1) = Val(T2.Text)

Diem1(2) = 0

Diem2(0) = Val(T3.Text)

Diem2(1) = Val(T4.Text)

Diem2(2) = 0

objLine =

 

 

Nhưng đến đoạn objLine = thì em không biết sử dụng lệnh Addline như thế nào cả:cheers:, toàn bị báo lỗi thôi

 

Em có tài liệu về VB.net cho AutoCad, họ hướng dẫn tạo file dll để sau đó sử dụng lệnh Netload trong Autocad. Nhưng em muốn sử dụng file dll đó để tạo 1 ứng dụng độc lập thì em phải làm thế nào

 

Mong mọi người giúp đỡ, tại vì lập trình em ko biết mấy:(

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Em đã tạo được chương trình để mở AutoCad từ VB.net nhưng mà một số lệnh của nó không giống như VB thì phải

 

Em không khai báo Acadline như VB được mà em phải làm thế này

 

Dim objAcApp As Autodesk.AutoCAD.Interop.AcadApplication

Dim objLine As Autodesk.AutoCAD.Interop.Common.AcadLine

Dim Diem1(0 To 2) As Double

Dim Diem2(0 To 2) As Double

 

Diem1(0) = Val(T1.Text)

Diem1(1) = Val(T2.Text)

Diem1(2) = 0

Diem2(0) = Val(T3.Text)

Diem2(1) = Val(T4.Text)

Diem2(2) = 0

objLine =

Nhưng đến đoạn objLine = thì em không biết sử dụng lệnh Addline như thế nào cả:cheers:, toàn bị báo lỗi thôi

 

Em có tài liệu về VB.net cho AutoCad, họ hướng dẫn tạo file dll để sau đó sử dụng lệnh Netload trong Autocad. Nhưng em muốn sử dụng file dll đó để tạo 1 ứng dụng độc lập thì em phải làm thế nào

 

Mong mọi người giúp đỡ, tại vì lập trình em ko biết mấy:(

 

Về cơ bản không thay đổi, VB6-VBA-VB.NET cũng đều có cùng nền tảng Visual Basic mà. Bạn chịu khó mày mò là ra thôi.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Về cơ bản không thay đổi, VB6-VBA-VB.NET cũng đều có cùng nền tảng Visual Basic mà. Bạn chịu khó mày mò là ra thôi.

Vâng, e cảm ơn anh, em mò ra rồi:D

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay
Đăng nhập để thực hiện theo  

×