VB Net (Offset help)
I'm a novice VB net user. I just bought bricscad and I'm trying to convert my VB net programs (written for Acad 2000) to Bricscad V8. Can anyone tell me why my offset command keeps throwing an error. Here is a sample of my code:Dim oACAD As BricscadApp.AcadApplicationDim oACADdoc As BricscadApp.AcadDocumentoACAD = GetObject(, "BricscadApp.AcadApplication")oACADdoc = oACAD.ActiveDocumentDim lineobject1 As BricscadDb.AcadLineDim offsetobject As ObjectDim StartPoint(2) As DoubleDim EndPoint(2) As DoubleStartPoint(0) = 120#StartPoint(1) = 0.0#StartPoint(2) = 0.0#EndPoint(0) = -120.0#EndPoint(1) = 0.0#EndPoint(2) = 0.0#lineobject1 = oACADdoc.ModelSpace.AddLine(StartPoint, EndPoint)lineobject1.color = 8lineobject1.Update()offsetobject = lineobject1.Offset(6.0)offsetobject.Update()
Comments
-
When I try, I get an “The method or operation is not implemented.” Error. So it’s probably being worked on.
0