RunCommand method example

  

Private Sub RunCommand_Example()
    Dim sCmd As String

    sCmd = "_Circle" & vbCr & "2,2,0" & vbCr & "4" & vbCr

    Thisdrawing.Application.RunCommand sCmd 
    sCmd = "_Line" & vbCr & "0,0 " & vbCr & "4,3" & vbCr

    Thisdrawing.Application..RunCommand sCmd 
End Sub

Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. © 2001- Menhirs NV - All rights reserved.