PureBasic Forums - English

How can I do this with PureBasic?
I try to use COMatePLUS but unsuccessfully. Don't know how to transfer variable values (like the arrays for coordinates startPoint and endPoint).

Dim acadApp As AcadApplication
Dim acadDoc As AcadDocument
Dim lineObj As AcadLine

Private Sub Command2_Click()
On ...