欢迎您访问 最编程 本站为您分享编程语言代码,编程技术文章!
您现在的位置是: 首页

如何在 solidworks 上部窗口中以 1 比 1 显示零件尺寸?

最编程 2024-04-02 15:17:09
...

问题:平时用SW画一个零件,想知道这个零件在实际中的大小。虽然可以自己使尺比划,但没有在屏幕上比划上来得直接。当有实际零件时,还可以控制鼠标滚轮来精确缩放,这太麻烦了。当没有零件时,用鼠标滚轮缩放就没有参考意义。

处理:故在网上进行搜索方法,需要写一个小脚本来显示,注意,需要根据自己屏幕尺寸来确定scale2的比例值,如下:

Option Explicit

Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swModView As SldWorks.ModelView
Sub main()

' Set swApp = Application.SldWorks

Set swApp = CreateObject("Sldworks.Application")
Set swModel = swApp.ActiveDoc
Set swModView = swModel.ActiveView

swModView.Scale2 = 0.795  '修改scale value
swModel.GraphicsRedraw2

End Sub


' scale value = 0.5(current scale value)/A*100
' A 为屏幕测量的正方形零件边长。

注意:实际使用过程中,会出现点击该宏后,零件找不到的情况,得想想怎么改善该代码。

原文地址:https://www.cnblogs.com/feishi312/p/17191030.html