找回密码
 注册
Simdroid-非首页
查看: 1814|回复: 26

[二次开发] 【原创】手把手教你在SW下用VB作二次开发

[复制链接]
发表于 2004-5-11 15:15:32 | 显示全部楼层 |阅读模式 来自 辽宁沈阳
为了显示标注的尺寸名称,首先修改SolidWorks设置,
在工具菜单下-选项-系统属性-一般
将其中的显示尺寸名称打钩!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×

评分

1

查看全部评分

 楼主| 发表于 2004-5-11 15:17:30 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

Simdroid开发平台
二、绘制草图、标注尺寸

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2004-5-11 15:20:53 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

三、拉伸成实体,并设置显示注解和显示特征尺寸

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2004-5-11 15:31:47 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

四、工具彩菜单-宏操作-新建
编写如下代码
Dim swApp As Object
Sub main()
    Set swApp = Application.SldWorks
    Set modelDoc = swApp.ActiveDoc
    Call ChangePara(modelDoc, 80, 60, 40, 30, 100)
End Sub
Sub ChangePara(ByVal Part As Object, ByVal Val1 As Double, ByVal Val2 As Double, ByVal Val3 As Double, ByVal Val4 As Double, ByVal Val5 As Double)
  
Part.Parameter("D1@草图1").SystemValue = Val1
Part.Parameter("D2@草图1").SystemValue = Val2
Part.Parameter("D3@草图1").SystemValue = Val3
Part.Parameter("D4@草图1").SystemValue = Val4
Part.Parameter("D1@拉伸1").SystemValue = Val5
Part.EditRebuild
  
End Sub
 楼主| 发表于 2004-5-11 15:34:20 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

五、不用退出VB编辑器直接运行

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2004-5-11 15:36:10 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

六、转到SolidWorks查看运行结果如下

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2004-5-11 15:41:38 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

七、说明
1.语句中的“D1@草图1”,其中D1为约束的尺寸名称,具体查看显示方法见一;草图1为建立的草图名称;
2.“D1@拉伸1”与上面相同;
3.在SolidWorks的API函数中,长度的单位为米;
  有什么问题,请留言!
发表于 2004-5-11 17:13:56 | 显示全部楼层 来自 上海南汇区

回复: 【原创】手把手教你在SW下用VB作二次开发

东西不错加一分。
对sw二次开发的初学者是很有启发。
发表于 2004-5-24 09:50:30 | 显示全部楼层 来自 四川成都

回复: 【原创】手把手教你在SW下用VB作二次开发

不错不错,你很热心啊!
发表于 2004-5-26 10:21:17 | 显示全部楼层 来自 上海杨浦区

回复: 【原创】手把手教你在SW下用VB作二次开发


太好了
我正好可以借鉴借鉴
发表于 2004-5-26 12:32:38 | 显示全部楼层 来自 上海交通大学

回复: 【原创】手把手教你在SW下用VB作二次开发

有个小建议就是写一个word文档之类的,详细的说说吧!光看这些不过瘾!
wanly621 该用户已被删除
发表于 2004-5-27 15:43:33 | 显示全部楼层 来自 陕西西安
提示: 作者被禁止或删除 内容自动屏蔽
 楼主| 发表于 2004-5-31 13:45:39 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

谢谢大家的支持,我会尽快将稍微高级一点的内容传上来,这里太冷清了。
chen_yuntian 该用户已被删除
发表于 2004-6-26 16:16:01 | 显示全部楼层 来自 北京海淀
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2004-7-29 06:37:51 | 显示全部楼层 来自 山西太原

回复: 【原创】手把手教你在SW下用VB作二次开发

太好了,
dibaka 该用户已被删除
发表于 2004-8-6 23:00:11 | 显示全部楼层 来自 湖北武汉
提示: 作者被禁止或删除 内容自动屏蔽
 楼主| 发表于 2004-8-16 09:26:42 | 显示全部楼层 来自 辽宁沈阳

回复: 【原创】手把手教你在SW下用VB作二次开发

目前在市场上只有一本讲SolidWorks二次开发的,《SolidWorks2003 二次开发基础与实例教程》,不过讲得不好,不太好懂。
发表于 2004-8-16 23:58:52 | 显示全部楼层 来自 台湾

回复: 【原创】手把手教你在SW下用VB作二次开发

看不出哪里特别
这种东西要如何知道哪里特别
可否告知
发表于 2010-10-16 18:22:05 | 显示全部楼层 来自 四川成都
太好了,我正想学习如何在这两种软件之间实现转换呢,谢谢。我练习下看看。
回复 不支持

使用道具 举报

发表于 2011-5-22 23:15:44 | 显示全部楼层 来自 浙江温州
很实用的,在学习中
回复 不支持

使用道具 举报

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

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-4-25 12:18 , Processed in 0.053587 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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