assign color to line vb.net with interop

Hi i am desperately trying to change the color of a line ......

i use visual studio and autocad 2009 in an out of process environment

right now i use this code to create a line

it works fine (i did not quote the code to assign the coordinates to the point)

but now i can not seem to be able to change the color of the object (acadline) i created.......

any help!!!!!?!??

'*******

Imports Autodesk.AutoCAD.Interop.acaddocumentclass

Imports autodesk.AutoCAD.Interop.Common

Module CONNETTI_AUTOCAD

Public acad As Autodesk.AutoCAD.Interop.AcadApplication

Public acaddoc As Autodesk.AutoCAD.Interop.AcadDocument

PublicSub CONNETTI_AUTOCAD_COM()

Dim linea As AcadLine

acad = GetObject(, "AUTOCAD.APPLICATION")

acaddoc = acad.activeDocument

linea = acaddoc.ModelSpace.AddLine(start, finish)

'**********

Hi

While you're using the COM API, you ca look at ACtiveX and VBA Reference in the AutoCAD Developer's Guide.

For the index colors you can use the Color Property which value have to be an integer between 0 and 256 or one of the following constants:

acByBlock(0)

acByLayer (256)

acRed (1)

acYellow (2)

acGreen (3)

acCyan (4)

acBlue (5)

acMagenta (6)

acWhite (7)

I'm not very comfortable with VB syntax, but it should be something like this

linea.Color = acRed or linea.Color = 1

For 'true colors' you have to use an AcadAcCmColor object :

Dim col As New AcadAcCmColor

col.Red = 28

col.Green = 111

col.Blue = 225

linea.TrueColor = col

thanks...the solution was far too easy once i understood....

thanks again