iCAx开思网

标题: 執行VB代碼的途徑 [打印本页]

作者: Francis 时间: 2013-6-29 01:47
标题: 執行VB代碼的途徑
本帖最后由 Francis 于 2013-6-29 01:52 编辑

個人認為，普通的SolidWorks用家（非編程人員），了解一下SolidWorks的API會有一定的好處，
好比偷看過底牌來玩耍撲克牌，肯定更能操控場面。

悶人所知道約有8種途徑，希望能集思廣益，發掘出更多途徑。

答題形式不限，純文字或圖文皆可，重點在於讓別人明白，如有跟貼者貼圖證明可行，各加2分，上限3位證明者，相當於每提供一種途徑可獲6分，當然重復作答的就不給分了（以最後修改帖子的時間為準）。

作者: gt.adan 时间: 2013-6-29 02:02
本帖最后由 gt.adan 于 2013-6-29 02:04 编辑

這分數…俺這徹底的宏盲是拿不到的了…但是重點關注！
此帖是否能視為開思正式開啟討論VB的起源呢？{:soso_e113:}
開思討論VB、API的人數或帖子，比起其他論壇真的少了許多呀~~
希望引來大家參與~

作者: ltq59 时间: 2013-6-29 08:20
等着给闷大加分

作者: w_hs 时间: 2013-6-30 10:47
看来闷大是偷看底牌的高手，与闷大玩纸牌的朋友可要当心了。{:soso_e120:}

我很少玩宏，作为门外汉，也来瞎凑几句（不知是否理解闷大的意思），可不敢要分啰。

1、最简单的当然是直接在SW中录制宏，保存宏。
2、在录制宏以后，用SW自带的VB编辑器修改宏，以扩展其适用范围。
3、将外部VB代码用SW自带的VB编辑器改造成SW适用的VB代码
4、直接用SW的VB编辑器及API编制VB代码

作者: Francis 时间: 2013-6-30 11:11

w_hs 发表于 2013-6-30 10:47
看来闷大是偷看底牌的高手，与闷大玩纸牌的朋友可要当心了。

我很少玩宏，作为门外汉，也来 ...

感謝不老叔支持。

以下是根據不老叔說說的，用SW自带的VB编辑器執行（運行）代碼的截圖。
[attach]1172026[/attach]

作者: ryouss 时间: 2013-6-30 11:15
本帖最后由 ryouss 于 2013-6-30 11:40 编辑

錄制方案讓不老叔"捷足先登"啦{:soso_e113:}
以初學者來說,應該錄制是學習"宏"的第一步.
以vba的"宏"來說,若是要深入,建議從"excel"學習各種物件(如UserForm,CommandButton,TextBox...)及指令,
再進入sw的API.

[attach]1172028[/attach]
1. 錄製"宏"產生 .swp 檔
2. 更改 myDimension.SystemValue = 0.025 的值,就可以得到所要的軸徑尺寸

[attach]1172027[/attach]

作者: wxys 时间: 2013-7-1 08:11
只能顶

作者: Francis 时间: 2013-7-2 16:48
https://www.solidworks.org.tw/fo ... id=21968&extra=

作者: 学者丁 时间: 2013-7-2 19:59
就知道一个录制,执行,还被抢先了.

作者: Francis 时间: 2013-7-3 13:19
技術分不值錢，送也沒人要。

作者: gt.adan 时间: 2013-7-3 14:06
本帖最后由 gt.adan 于 2013-7-3 14:15 编辑

悶大已在幾何貼出答案了…好多好多種方法…

1. 自带VB编辑器開啟和執行SWP檔案。
2. 工具列或功能表直接執行SWP檔案。
3. 自定義SWP檔案到一個工具列的按鈕。
4. 自定義SWP檔案到一個快速鍵。
5. 自定義SWP檔案到功能表項次。
6. 在其他程序以RunMacro2呼叫並執行指定的SWP檔案。
7. 啟動SolidWorks同時執行指定的SWP檔案。
[attach]1172230[/attach]
8. 巨集特徵，重算零件或組合件時自動執行指定的SWP檔案。
9. 附加SWP檔案到Design Binder，按右鍵執行。
10. 代碼嵌合到『摘要，自訂屬性』，再以數學關係式執行嵌合的代碼。（無需SWP檔案）
[attach]1172236[/attach]
11. 在其他軟體（如 Excel 或 CorelDRAW）中的VBA執行SolidWorks的VB代碼。（無需SWP檔案）
12. 在VB6編輯器軟體中，翻譯成執行檔案 EXE 或 DLL。（無需SWP檔案但要另外購買軟體）
13. 在檔案總管拖動SWP檔案到SolidWorks的標題欄，就會立即執行SWP檔案內的代碼。

作者: gt.adan 时间: 2013-7-3 17:06
本帖最后由 gt.adan 于 2013-7-3 17:11 编辑

第4點. 自定義SWP檔案到一個快速鍵。<===常用！
第7點. 啟動SolidWorks同時執行指定的SWP檔案。<===還在試！
第10點. 10. 代碼嵌合到『摘要，自訂屬性』，再以數學關係式執行嵌合的代碼。（無需SWP檔案）
在三維看見悶大對 qiminger 朋友提取名字宏的精彩教程，
才了解悶大在「草圖導出複製排列，數量的標注」一帖中所說的「嵌入宏」是如何實現的。

再次謝謝悶大教學~

作者: hero522 时间: 2013-7-4 12:31
感謝悶大的教學

資質過低只能體悟到第5項"自定義SWP檔案到功能表"，學習過程擷圖
[attach]1172320[/attach]
[attach]1172321[/attach]
[attach]1172322[/attach]
[attach]1172323[/attach]
[attach]1172324[/attach]

作者: zhanghaitao 时间: 2013-7-4 16:32

Francis 发表于 2013-7-3 13:19
技術分不值錢，送也沒人要。

那送我几分吧{:soso_e113:}

作者: ltq59 时间: 2013-7-4 22:10
骚窝形象大使献身了！{:soso_e178:}

作者: gt.adan 时间: 2013-7-5 11:59
本帖最后由 gt.adan 于 2013-7-5 12:00 编辑

第九種方式，附加到 Design Binder 右鍵執行。
範例：執行提取邊界宏

[attach]1172390[/attach]

作者: ltq59 时间: 2013-7-5 13:48
{:soso_e179:}阿丹过百了，恭喜！

作者: 杀苏 时间: 2013-7-5 17:05
宏小白来顶帖..{:soso__3110130392203091378_3:}

作者: zhanghaitao 时间: 2013-7-5 18:51
谢谢闷大送分

作者: gddx110 时间: 2014-9-12 09:00
强大！

作者: gddx110 时间: 2014-9-12 09:01
闷大，你好，求助一个问题
我想在工程图里操作，删除明细表C列以“2”开头的一行
可以用宏实现吗？

作者: qiminger 时间: 2016-12-2 11:32
谢谢闷大经常分享的教程，在下受益匪浅，非常感谢。
研究一下方法6. 在其他程序以RunMacro2呼叫並執行指定的SWP檔案。
学习用编程生成EXE方法，关联*.swp类型，直接双击*.swp执行，不显示EXE主界面,可在任意文件夹操作。
[attach]1242036[/attach]

作者: wldm 时间: 2019-6-27 23:33
闷大，你好，怎么把两个宏合一个宏执行，用用第三个宏开合并，前面两个宏代码不是通一样语言编写的

作者: scattie 时间: 2019-6-28 08:50
学习一下挺不错的

欢迎光临 iCAx开思网 (https://www.icax.org/)