506509 1 Báo cáo bài đăng Đã đăng Tháng 11 25, 2016 Như chúng ta đã biết ưu điểm khi viết chương trình VBA chạy trên Cad hoặc Excel là chạy khá nhanh. Nhưng nó có một nhược điểm chí tử là tính bảo mật quá kém, chính vì vậy mà người lập trình không muốn sử dụng nó để viết nên các phần mềm có tính chất thương mại được. Do đó VB.net ra đời để bù vào vấn đề này. Nhưng mà với những người lười thì việc học VB.net quả là quá mệt,( bản thân VB cũng được viết để cho những người lười sử dụng để lập trình rồi bây giờ muốn chăm chỉ lại thì mệt quá). Tuy nhiên chúng ta vẫn còn 1 cách nữa để viết chương trình trên VBA sau đó Export ra dưới dạng ".frm" và chèn thêm đoạn mã ở đầu chương trình để tạo liên kết giữa VB6 và Autocad rồi xuất chương trình ra dưới dạng file .EXE : - Lưu ý việc kết nối giữa Cad và VB6 bạn cần chọn thêm thư viện Cad cho VB6 bằng cách vào Poject -> Preferences.... nó sẽ hiện lên bảng. bạn di chuyển đến chỗ Auto.... để chọn thư viện "Aotocad 2007 type Library" . Dim moACAD As Object Dim THISDRAWING As Object On Error Resume Next Set moACAD = GetObject(, "AutoCAD.Application") If Err.Number Then Err.Clear Set moACAD = CreateObject("AutoCAD.Application") If Err.Number Then MsgBox "bat cad len di. chuong trinh khong tu mo duoc Cad cua bam" Exit Sub Else moACAD.Visible = True End If End If 'moACAD.Application.Documents.Add Set THISDRAWING = moACAD.ActiveDocument moACAD.WindowState = 3 1 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