10-参数设置.ppt

参数设置 参数设置SW二次开发VB讲座 一 自定义参数 07 57 37 自定义参数 零件 装配与图纸 参数设置SW二次开发VB讲座 07 57 37 自定义参数程序SetswApp Application SldWorksSetPart swApp ActiveDocDimCusPropMgrAsSldWorks CustomPropertyManagerSetCusPropMgr Part Extension CustomPropertyManager DimaddstatusAsLongaddstatus CusPropMgr Add2 图号 swCustomInfoText AB 150 008 addstatus CusPropMgr Add2 Material swCustomInfoText Chr 34 SW Material 零件1 SLDPRT Chr 34 addstatus CusPropMgr Add2 Weight swCustomInfoText Chr 34 SW Mass 零件1 SLDPRT Chr 34 addstatus CusPropMgr Add2 日期 swCustomInfoDate 2011 08 15 参数设置SW二次开发VB讲座 一 自定义参数 07 57 37 自定义参数更改 获取与删除addstatus CusPropMgr Set 图号 AB 150 007 addstr CusPropMgr Get Material CusPropMgr Delete 日期 自定义参数遍历DimNamesAsVariantDimNamelongasLongDimNonameAsStringNamelong CusPropMgr CountNames CusPropMgr GetNamesFori 0toNamelongNoname Names i Nexti 参数设置SW二次开发VB讲座 一 自定义参数 二 配置特定参数 07 57 37 配置特定参数 参数设置SW二次开发VB讲座 07 57 37 配置特定参数SetswApp Application SldWorksSetPart swApp ActiveDocDimretvalAsVariantDimCusPropMgrAsSldWorks CustomPropertyManagerretval Part GetConfigurationNames SetCusPropMgr Part Extension CustomPropertyManager retval UBound retval DimaddstatusAsLongaddstatus CusPropMgr Add2 图号A swCustomInfoText AB 150 008 addstatus CusPropMgr Add2 MaterialA swCustomInfoText Chr 34 SW Material 零件1 SLDPRT Chr 34 addstatus CusPropMgr Add2 WeightA swCustomInfoText Chr 34 SW Mass 零件1 SLDPRT Chr 34 addstatus CusPropMgr Add2 日期A swCustomInfoDate 2011 08 15 参数设置SW二次开发VB讲座 二 配置特定参数 三 摘要参数 07 57 37 摘要参数 参数设置SW二次开发VB讲座 07 57 37 摘要参数SetswApp Application SldWorksSetPart swApp ActiveDocPart SummaryInfo SwConst swSumInfoAuthor AAAA Part SummaryInfo SwConst swSumInfoKeywords BBBB Part SummaryInfo SwConst swSumInfoComment CCCC Part SummaryInfo SwConst swSumInfoTitle DDDD Part SummaryInfo SwConst swSumInfoSubject EEEE 该信息的编辑处理 修改是在该项上重新输入删除只能再次输入 获