DrawLineDashDot question

[tsdt]

Hi all,

Just wonder whether if there is something wrong with this portion of the code.. I kept on getting errors on this.


Dim Type(Dashlen, Spacelen) Dashes as Int32

...
...

Dashes.Dashlen = 2
Dashes.Spacelen = 2

drawExObj.DrawLineDashDot(PenExObj.Value, xLoc1, yLoc1, xLoc2, yLoc2, Dashes(,))

...

Something is wrong here..

Thanks.

:sign0085:

 

[klaus]

Try this code:

Dim Type(Dashlen, Spacelen) Dashes(1) as Int32
 
...
...
 
Dashes(0).Dashlen = 2
Dashes(0).Spacelen = 2
 
drawExObj.DrawLineDashDot(PenExObj.Value, xLoc1, yLoc1, xLoc2, yLoc2, Dashes())

Best regards.

 

[tsdt]

Try this code:

Dim Type(Dashlen, Spacelen) Dashes(1) as Int32
 
...
...
 
Dashes(0).Dashlen = 2
Dashes(0).Spacelen = 2
 
drawExObj.DrawLineDashDot(PenExObj.Value, xLoc1, yLoc1, xLoc2, yLoc2, Dashes())

Best regards.

Thanks