24小时热门版块排行榜    

查看: 1411  |  回复: 8

2457

铁虫 (小有名气)

[求助] SolidWorks二次开发编程出现问题 已有1人参与

刚刚接触Solidworks的二次开发,利用软件的宏命令编写程序,应该是一个圆柱矩阵的图形,代码如下:
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Sub main()
Dim k As Single
Dim l As Single
Dim Dir1 As Single
Dim Dir2 As Single
    Set swApp = Application.SldWorks
    Set Part = swApp.NewPart
    Set Part = swApp.ActiveDoc
For k = 1 To 36
    l = k * 3.1416 / 18
If Sin(l) >= 0 Then
Dir1 = 0.1 * Sin(l)
Dir2 = 0.001
ElseIf Sin(l) < 0 Then
Dir1 = 0.001
Dir2 = -1 * Sin(l)
End If
Set skSegment = Part.SketchManager.CreateCircle(0.1 * Cos(1), 0.1 * Sin(l), 0#, 0.1 * Cos(l), 0.1 * Sin(l) + 0.005, 0#)
Set myFeature = Part.FeatureManager.FeatureExtrusion2(False, False, False, 0, 0, Dir1, Dir2, False, False, False, False, 1, 1, False, False, False, False, True, True, True, 0, 0, False)
Part.ShowNamedView2 "*上下二等角轴测", 8
Next k
End Sub
但是,执行命令出现的图形却是错误的,如图所示。请各位大神帮忙看看我是哪里错了,谢谢

SolidWorks二次开发编程出现问题
自己编程.png


SolidWorks二次开发编程出现问题-1
理论结果.png
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

arsasus

铜虫 (初入文坛)

【答案】应助回帖

★ ★ ★ ★ ★
2457: 金币+5, ★★★★★最佳答案 2014-11-25 09:25:17
Set skSegment = Part.SketchManager.CreateCircle(0.1 * Cos(1), 0.1 * Sin(l), 0#, 0.1 * Cos(l), 0.1 * Sin(l) + 0.005, 0#)
这句圆心坐标中的0.1 * Cos(1)应该改为0.1*Cos(l)吧而不是1
2楼2014-11-24 13:23:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

2457

铁虫 (小有名气)

引用回帖:
2楼: Originally posted by arsasus at 2014-11-24 13:23:10
Set skSegment = Part.SketchManager.CreateCircle(0.1 * Cos(1), 0.1 * Sin(l), 0#, 0.1 * Cos(l), 0.1 * Sin(l) + 0.005, 0#)
这句圆心坐标中的0.1 * Cos(1)应该改为0.1*Cos(l)吧而不是1

果然是这样的,谢谢
3楼2014-11-25 09:25:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

2457

铁虫 (小有名气)

引用回帖:
2楼: Originally posted by arsasus at 2014-11-24 13:23:10
Set skSegment = Part.SketchManager.CreateCircle(0.1 * Cos(1), 0.1 * Sin(l), 0#, 0.1 * Cos(l), 0.1 * Sin(l) + 0.005, 0#)
这句圆心坐标中的0.1 * Cos(1)应该改为0.1*Cos(l)吧而不是1

但是改了之后出现一侧的圆柱过长,是什么原因呢 ?
SolidWorks二次开发编程出现问题-2
1.png

4楼2014-11-25 09:32:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

arsasus

铜虫 (初入文坛)

引用回帖:
4楼: Originally posted by 2457 at 2014-11-25 09:32:59
但是改了之后出现一侧的圆柱过长,是什么原因呢 ?

1.png
...

这句Dir2 = -1 * Sin(l),把1改成0.1,因为你上面是Dir1 = 0.1 * Sin(l)

» 本帖已获得的红花(最新10朵)

5楼2014-11-25 13:18:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

2457

铁虫 (小有名气)

送红花一朵
引用回帖:
5楼: Originally posted by arsasus at 2014-11-25 13:18:16
这句Dir2 = -1 * Sin(l),把1改成0.1,因为你上面是Dir1 = 0.1 * Sin(l)...

成功了,谢谢!
6楼2014-11-26 09:15:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

2457

铁虫 (小有名气)

引用回帖:
5楼: Originally posted by arsasus at 2014-11-25 13:18:16
这句Dir2 = -1 * Sin(l),把1改成0.1,因为你上面是Dir1 = 0.1 * Sin(l)...

可不可以加一个您的QQ呢?我还有些地方不太懂。
7楼2014-11-26 09:42:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

arsasus

铜虫 (初入文坛)

引用回帖:
7楼: Originally posted by 2457 at 2014-11-26 09:42:51
可不可以加一个您的QQ呢?我还有些地方不太懂。...

你可以说说那些方面的问题,我对二次开发也只是略知一点皮毛,之前毕业设计做过,如果会的我可以帮助你一下
8楼2014-11-26 13:59:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

2457

铁虫 (小有名气)

引用回帖:
8楼: Originally posted by arsasus at 2014-11-26 13:59:07
你可以说说那些方面的问题,我对二次开发也只是略知一点皮毛,之前毕业设计做过,如果会的我可以帮助你一下...

我也是毕业设计要用到,旋转叶片的优化设计,需要编程画叶片,然后优化,只不过我现在还停留在文献阅读的阶段。
9楼2014-11-28 15:28:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 2457 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 085600材料与化工调剂 324分 +9 llllkkkhh 2026-03-18 9/450 2026-03-19 07:40 by BruceLiu320
[考研] 281求调剂(0805) +6 烟汐忆海 2026-03-16 16/800 2026-03-19 00:59 by 烟汐忆海
[考研] 328求调剂,英语六级551,有科研经历 +3 生物工程调剂 2026-03-17 7/350 2026-03-18 20:41 by Wangjingyue
[考研] 311求调剂 +11 冬十三 2026-03-15 12/600 2026-03-18 14:36 by 星空星月
[考研] 0703化学调剂 ,六级已过,有科研经历 +10 曦熙兮 2026-03-15 10/500 2026-03-18 14:19 by 007_lilei
[考研] 331求调剂(0703有机化学 +7 ZY-05 2026-03-13 8/400 2026-03-18 14:13 by 007_lilei
[考研] 070300化学319求调剂 +6 锦鲤0909 2026-03-17 6/300 2026-03-18 13:22 by Iveryant
[考研] 0703化学调剂 +3 妮妮ninicgb 2026-03-17 3/150 2026-03-18 10:29 by macy2011
[考研] 有没有道铁/土木的想调剂南林,给自己招师弟中~ +3 TqlXswl 2026-03-16 7/350 2026-03-17 15:23 by TqlXswl
[考研] 梁成伟老师课题组欢迎你的加入 +8 一鸭鸭哟 2026-03-14 10/500 2026-03-17 15:07 by 一鸭鸭哟
[考研] 一志愿苏州大学材料工程(085601)专硕有科研经历三项国奖两个实用型专利一项省级立项 +6 大火山小火山 2026-03-16 8/400 2026-03-17 15:05 by 无懈可击111
[考研] 290求调剂 +6 孔志浩 2026-03-12 11/550 2026-03-17 14:41 by 周舟舟77
[考博] 26申博 +4 八旬速览 2026-03-16 4/200 2026-03-17 13:00 by 轻松不少随
[基金申请] 国自科面上基金字体 +6 iwuli 2026-03-12 7/350 2026-03-16 21:18 by sculhf
[基金申请] 今年的国基金是打分制吗? 50+3 zhanghaozhu 2026-03-14 3/150 2026-03-16 17:07 by 北京莱茵润色
[考研] 318求调剂 +3 Yanyali 2026-03-15 3/150 2026-03-16 16:41 by houyaoxu
[考研] 070300化学学硕求调剂 +6 太想进步了0608 2026-03-16 6/300 2026-03-16 16:13 by kykm678
[考研] 085600调剂 +5 漾漾123sun 2026-03-12 6/300 2026-03-16 15:58 by 漾漾123sun
[考研] 297一志愿上交085600求调剂 +5 指尖八千里 2026-03-14 5/250 2026-03-14 17:26 by a不易
[考研] 求调剂 +5 一定有学上- 2026-03-12 5/250 2026-03-13 18:31 by ms629
信息提示
请填处理意见