|
马上注册,结交更多同行朋友,交流,分享,学习。
您需要 登录 才可以下载或查看,没有帐号?注册
x
SOLIDWORKS录制一个关于草图中插入图块并爆炸的宏,但是为什么多次使用后会失效?问题出在哪里,求大神解答,谢谢。- Dim swApp As Object
- Dim Part As Object
- Dim boolstatus As Boolean
- Dim longstatus As Long, longwarnings As Long
- Dim instance As ISketchManager
- Dim LpSketchBlockInstance As SketchBlockInstance
- Sub main()
- Set swApp = Application.SldWorks
- Set Part = swApp.ActiveDoc
- Dim myBlockDefinition As Object
- Set myBlockDefinition = Part.SketchManager.MakeSketchBlockFromFile(Nothing, "C:\Users\Administrator\Desktop\块1.SLDBLK", False, 1, 0)
- boolstatus = Part.Extension.SketchBoxSelect("-500", "-500", "-500", "500", "500", "500")
- Part.SketchManager.ExplodeSketchBlockInstance Nothing
复制代码
|
|