AutoCAD 14 i VB6

[bordzija]

Hteo bih preko VB-a da unesem neki podatak u AutoCAD
potreban mi je kod za:

- tacku
- liniju
- tekst

'zakacena referenca AutoCAD Object Library
'Template Drawing.dwt

Option Explicit
Public acApp As Object 'Aplikacija
Public acDoc As Object 'Dokument
Public acPoi As AutoCAD.IAcadPoint 'tacka
Public acLin As AutoCAD.IAcadLine 'linija
Public acTex As AutoCAD.IAcadText 'tekst

Private Sub Form_Load()

Set acApp = CreateObject("Autocad.Application")
Set acDoc = acApp.ActiveDocument

acApp.Visible = False
acDoc.Open App.Path & "\Drawing.dwt"

'cod za tacku

'cod za liniju

'cod za tekst


trazio sam na sajtovima:

www.vbcode.com
www.freevbcode.com
www.a1vbcode.com
www.codearchive.com

par kodova sam nasao i nista mi nije pomoglo.