[Débutant] Type de ligne sur autocad2007 par VBA

Sur Autocad 2007, je souhaite réaliser sous VBA un type de ligne.
Mon programme ci-dessous ne permet pas à Autocad de réaliser(sous la commande VBA) le type de ligne concerné.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
            Case 2  'Pointillé
                Dim ttypeline As String
                Dim oLine As AcadLine
                ttypeline = "ACAD_ISO06W100"
                'oForme.Style = ttypeline
                oForme.Linetype = "DASHDOT"
                oForme.Lineweight = acLnWt013
 
 
                'Set oLineType = acLnWt005
               'oForme.oLineType = ttypeline
 
        End Select