How to change features of a created linear pattern (VB.net)

Hello Everyone,

I would appreaciate your help to show me a sample code to control the features of a linear pattern.

dim part as object

dim myDimension as object

        Part = swapp.OpenDoc2("asd.part", 1, False, False, True, 1)

        myDimension = Part.Extension.SelectByID2("LPattern1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0)
        myDimension.LinearPatternFeatureData(6, 0.012, 1, 0.05, False, False, "NULL", "NULL", False, 0)

'LPattern1 is an existing linear pattern on asd.part

Thanks.

SolidworksApi macros