SolidWorks如何通过宏创建动画？_ACT_System_SolidWorks_钣金

SolidWorks如何通过宏创建动画？

效果：

方法：

1.点击“旋转凸台/基体”，在前视基准面绘制如下图所示的草绘。

2.不退出草图，点击【工具】-【宏】-【录制】，如下图所示。

此时弹出如下图所示的宏命令窗口。

3.标注圆弧的半径，注意标注的名称：D1@草图1，我们会在后面的程序里用到。

4.暂停宏的录制。

5.再次点击“旋转凸台/基体”，在前视基准面绘制如下图所示的草绘。

6.点击宏窗口中的“录制/暂停宏”，重新开始宏的录制。

7.标注圆弧的半径，注意标注的名称：D2@草图2，我们会在后面的程序里用到。

8.停止宏的录制，保存宏文件。

9.完成。

10.点击“拉伸凸台/基体”，在右视基准面绘制直径为5的圆，拉伸深度250mm。

11.点击【工具】-【宏】-【编辑】，对第8步创建的宏文件进行编辑。

'*********************************************************************' 机械时代网'*********************************************************************Dim swApp As ObjectDim Part As ObjectDim boolstatus As BooleanDim longstatus As Long, longwarnings As LongSub main()Set swApp = _Application.SldWorksSet Part = swApp.ActiveDocDim myModelView As ObjectSet myModelView = Part.ActiveViewmyModelView.FrameState = swWindowState_e.swWindowMaximizedboolstatus = Part.Extension.SelectByID2("Arc1", "SKETCHSEGMENT", -3.34257815068415E-02, 3.85000625199539E-02, 0, False, 0, Nothing, 0)Dim myDisplayDim As ObjectSet myDisplayDim = Part.AddDimension2(-7.66050911352832E-02, 5.93818597992822E-02, 0)Part.ClearSelection2 TrueDim myDimension As Object'设置草图1中的尺寸D1命名为myDimension1Set myDimension1 = Part.Parameter("D1@草图1")myDimension1.SystemValue = 0.05boolstatus = Part.Extension.SelectByID2("Arc1", "SKETCHSEGMENT", 0.218813672939049, 2.90099272265772E-02, 0, False, 0, Nothing, 0)Set myDisplayDim = Part.AddDimension2(0.148814034900672, 8.75673167394499E-02, 0)Part.ClearSelection2 True'设置草图2中的尺寸D2命名为myDimension2Set myDimension2 = Part.Parameter("D2@草图2")myDimension2.SystemValue = 0.05'对尺寸D1和D2进行操作For i = 0 To 24myDimension1.SystemValue = myDimension1.SystemValue + 0.002myDimension2.SystemValue = myDimension2.SystemValue - 0.002boolstatus = Part.EditRebuild3()t = TimerWhile Timer < t + 0.1DoEventsWendNext'对尺寸D1和D2进行操作Fori = 0To24myDimension1.SystemValue = myDimension1.SystemValue-0.002myDimension2.SystemValue = myDimension2.SystemValue + 0.002boolstatus = Part.EditRebuild3()t = TimerWhileTimer < t + 0.1DoEventsWendNextEndSub

12.运行宏文件。

来源：SolidWorks技巧

SolidWorks建模并渲染一个编制管

最终结果如下图所示：方法：1.击草图绘制，在上视基准面绘制如下图所示的草图。2.再次击草图绘制，在右视基准面绘制如下图所示的草图。3.点击“插入”-“曲面”-“扫描曲面”，选择草图1作为扫描的路径，选择草图2作为扫描的轮廓，按照下图进行设置。点击勾号完成。4.点击草图绘制，在上视基准面绘制如下图所示的草图。5.点击“插入”-“曲线”-“螺旋线/涡状线”，按照下图进行设置。点击勾号完成。6.点击草图绘制，在上视基准面绘制如下图所示的草图。7.再次点击草图绘制，在右视基准面绘制如下图所示的草图。8.点击扫描，选择草图4作为扫描的轮廓，选择草图5作为扫描的路径，引导线选择步骤5创建的螺旋线，勾选“薄壁特征”选项，类型选择“单向”，壁厚为0.1mm。点击勾号完成。9.对上一步创建的扫描特征进行镜向。点击勾号完成。10.点击草图绘制，在上视基准面绘制如下图所示的草图。11.点击“插入”-“曲线”-“螺旋线/涡状线”，按照下图进行设置。点击勾号完成。12.点击草图绘制，在上视基准面绘制如下图所示的草图。13.点击草图绘制，在右视基准面绘制如下图所示的草图。14.点击扫描切除，选择草图7作为扫描的路径，选择步骤12创建的草图区域作为扫描的轮廓，引导线选择螺旋线2，如下图所示。点击勾号完成。15.点击草图绘制，在上视基准面绘制如下图所示的草图。16.点击“插入”-“曲线”-“螺旋线/涡状线”，按照下图进行设置。17.点击草图绘制，在上视基准面绘制如下图所示的草图。18.点击扫描切除，选择草图7作为扫描的路径，选择步骤17创建的草图区域作为扫描的轮廓，引导线选择螺旋线3，如下图所示。点击勾号完成。19.创建基准轴1。20.圆周阵列。按照下图进行设置。21.渲染完成。来源：SolidWorks技巧