SolidWorks机械工程师网——最大的SolidWorks学习平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 1018|回复: 1
打印 上一主题 下一主题

菜鸟紧急求助高手,关于开发solidworks标准件库的,快请进

[复制链接]

4

主题

46

帖子

25

金币

天使

Rank: 2Rank: 2

积分
87
QQ
跳转到指定楼层
楼主
发表于 2005-6-6 20:06:24 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

   经典图书
高手大哥,这关系到我的毕业设计,如果您知道,请务必帮我啊!
我开发标准件库,
但老师要求我在每用程序画完一个标准件时,如螺母
它的属性--->摘要信息里面要自动存在如下信息
备注
代号
名称
数量
材料
请问该怎么实现???????
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 转播转播 分享教程|习题|模型|技巧 点赞点赞 拍砖拍砖
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复

使用道具 举报

3

主题

52

帖子

24

金币

天使

Rank: 2Rank: 2

积分
83
QQ
沙发
发表于 2005-6-7 10:03:44 | 只看该作者
去三维空间看cadtools老大的程序
下面是个例子

Public Sub writeitem()
On Error Resume Next
Dim configname As String
Set swApp = CreateObject("SldWorks.Application")
Set swModel = swApp.ActiveDoc

FileName = swModel.GetTitle()
filepath = swModel.GetPathName()
Set CurCFG = swModel.GetActiveConfiguration()
configname = CurCFG.name
retval = swModel.DeleteCustomInfo2("", "规格")
‘retval = swModel.DeleteCustomInfo2(configname, "规格")
retval = swModel.AddCustomInfo3(configname, "规格", swCustomInfoText, Text1.Text)

End Sub

这是自定义的属性,对于内置的属性字段直接使用CustomInfo2对象实现
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭 卷起
关闭 卷起

SOLIDWORKS 2023 机械设计从入门到精通

手机版|小黑屋| GMT+8, 2024-9-20 22:35 , Processed in 0.473806 second(s), 24 queries , Memcache On.

SolidWorks机械工程师网 ( 鲁ICP备14025122号-2 ) 鲁公网安备 37028502190335号

声明:本网言论纯属发表者个人意见,与本网立场无关。
如涉版权,可发邮件: admin@swbbsc.com

快速回复 返回顶部 返回列表