boy
下载贤集网APP入驻自媒体
Add CATPart Parameter.CATScript
Script CodeSub CATMain() Dim myDoc As Document Set myDoc = CATIA.ActiveDocument Dim revision As IntParam Set revision = myDoc.Part.Parameters.CreateInteger ("RevisionNumber", 1) Dim density As RealParam Set density = myDoc.Part.Parameters.CreateReal("density", 2.5) End Sub一段创建参数的代码，直接复制使用即可。
