Topsolid online Help Index
This example shows how to create a basic parameter.
Dim TopDoc As TopSolid.DocumentDesign
...
Dim pa As TopSolid.Parameter
' make parameter = 10mm
Set pa = TopDoc.Parameters.AddBasic(10, "mm")
...
Topsolid online Help Index