我如何获取 CATDrawing 中的参数值并对其进行编辑

how do i get the value of a parameter in a CATDrawing and edit it

我希望能够得到参数CATDWG_SH_NO的值。并将 Totalsheets1 的值添加到其中。 所以最后的 strparam1.Value 会给我前面提到的 2 的总和。我现在的代码只将参数值更新为 totalsheets1 值。 我面临的另一个问题是,只有当值存在于参数多值下拉列表中时,代码才会更新该值,即如果值 10 不在下拉列表中,它将无法更新参数。 任何帮助将不胜感激。谢谢。

Function SheetNoUpdate(odoc As Document)

Dim parameters1 As Parameters

Set parameters1 = odoc.Parameters

Set strparam1 = parameters1.Item("CATDWG_REV")
strparam1.Value = "A"
Set strparam1 = parameters1.Item("CATDWG_SH_NO.")
strparam1.Value = Totalsheets1.Value

End Function

我不确定我对你问题的解释是否正确:如果你想添加值,请尝试:

strparam1.Value = strparam1.Value + Totalsheets1.Value
'or if both are strings
strparam1.Value = CStr(CInt(strparam1.Value) + CInt(Totalsheets1.Value))

或者您要创建公式吗?
在多值参数上,您可以使用 GetEnumerateValuesSetEnumerateValues 获取值(数组)以分配数组。