Tạo đường Line trong VBA For AutoCad:

 Cách tạo, ve đường thẳng line trong Lập trình VBA For AutoCad:
- Tiếp tục bài học: Tạo 1 đường line trong VBA Autocad:
- Mục tiêu lập trình vẽ đường line trên Model Space.
- Cách thức học bằng cách sử dụng các hàm sẵn có trên Help VBA và tùy biến theo mong muốn.( đây là cách dùng chuyên nghiệp trong thời đại này nay). Tuy nhiên để nâng cao kỹ năng bạn cũng nên viết cụ thể 1 chương trình.
Trong bào học này tôi sẽ cố gắng giải thích rõ từ tham số, hàm để các bạn cùng nắm bắt.
Code sử dụng:

Function AddMyLine(x1, y1, z1, x2, y2, z2 As Double)

 
    Dim lineObj As AcadLine
    Dim startPoint(0 To 2) As Double
    Dim endPoint(0 To 2) As Double

    startPoint(0) = x1: startPoint(1) = y1: startPoint(2) = z1
    endPoint(0) = x2: endPoint(1) = y2: endPoint(2) = z2
    ' Create the line in model space
    Set lineObj = ThisDrawing.ModelSpace.AddLine(startPoint, endPoint)
    ZoomAll

End Function


Video hướng dẫn: tạo đường thẳng tự động vào autocad bằng VBA