AutoCAD VB :: Create Multi Line In VBA

My question is about the criation of the mulilines using UTM and VBA.

Let's go! I have the next script:

Public Sub LinhaDuplaContinua()
Dim multiLineObj As AcadMLine
Dim Vertices(1 To 36) As Double
Vertices(1) = 547990.632012883
Vertices(2) = 9500776.33954744

[Code]..

This script add a new multi-line in the AUTOCAD.

How I configure that line in the VBA? I need create parallel lines with determinate offset and width.

I need create this type lines in determinate time:

Continuous Double Line:
______________________________
______________________________

Double Right Dashed Line
_______________________________
_ _ _ _ _ _ _ _ _ _ _ _ _

Double Left Dashed Line
_ _ _ _ _ _ _ _ _ _ _ _ _
_______________________________

Double Dashed Line
_ _ _ _ _ _ _ _ _ _ _ _ _
_ _ _ _ _ _ _ _ _ _ _ _ _

How i configure that in the VBA?