|
- blnretval = Part.DeleteCustomInfo2("", "边界框长度") '
- blnretval = Part.DeleteCustomInfo2("", "边界框宽度")
- blnretval = Part.DeleteCustomInfo2("", "钣金厚度")
- blnretval = Part.AddCustomInfo3("", "边界框长度", swCustomInfoText, bjkcd) '
- blnretval = Part.AddCustomInfo3("", "边界框宽度", swCustomInfoText, bjkkd)
- blnretval = Part.AddCustomInfo3("", "钣金厚度", swCustomInfoText, bjhd)
- blnretval = Part.DeleteCustomInfo2("", "边界框长度") '
- blnretval = Part.DeleteCustomInfo2("", "边界框宽度")
- blnretval = Part.DeleteCustomInfo2("", "钣金厚度")
- blnretval = Part.AddCustomInfo3("", "边界框长度", swCustomInfoText, bjkcd) '
- blnretval = Part.AddCustomInfo3("", "边界框宽度", swCustomInfoText, bjkkd)
- blnretval = Part.AddCustomInfo3("", "钣金厚度", swCustomInfoText, bjhd)
- blnretval = Part.AddCustomInfo3("", "边界框宽度", swCustomInfoText, bjkkd)
- blnretval = Part.AddCustomInfo3("", "规格", swCustomInfoText, Format(bjkcd, "0") & "*" & Format(bjkkd, "0") & "*" & Format(bjhd, "0"))
,
改成:
,
blnretval = Part.DeleteCustomInfo2("默认", "规格")
blnretval = Part.AddCustomInfo3("默认", "规格", swCustomInfoText, Format(bjkcd, "0") & "*" & Format(bjkkd, "0") & "*" & Format(bjhd, "0"))
|
|