装配图及普通零件的重心标记(VBA)
Public Sub WorkPointAtMassCenter() Dim oDoc As Document Set oDoc = ThisApplication...
Public Sub WorkPointAtMassCenter() Dim oDoc As Document Set oDoc = ThisApplication...
长夏已尽,凛冬将至。
在这个炎热的夏季,想想冬天就要到了,真他妈的舒服。
Imports System.Windows.Forms Imports System.IO Public Sub Main Dim oPath As String &nbs...
一般,titleblockdefiition都会有一个name(名称),用这个名称去确认某个工程图中的标题栏是否是指定的。这里采用一个函数去判断,会比较简单,如下:Function TBExists(oTBName) As BooleanE...
方法一:iproperty中获取Dim invPartDoc As Document = _invApp.ActiveDocument Dim ifilename As S...
距离初始版本有一段时间了。新版本选择更加小巧的主界面。本插件的开发,主要是解决国内用户的一些习惯。如工程图明细栏标准化。装配体内重命名等。主要包含以下几个功能:1、通过文件名提取相关数据到IPROPERTY 中,最终映射到工程图;可有效整合...
将以下代码存为txt文件,通过ilogic导入外部规则,然后运行规则。主要可以自动识别纸张,并且可实现自动最佳打印模式。不必每次都去人工选择横向及纵向。实现无脑打印。
Public Sub Main Dim oPath As String ' Search for the folder Dim Dialog = New FolderBrowserDialog() Dialog.ShowNewFo...
SDK原版参考Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click &nb...
最近玩了一下Autodesk的三维设计软件Inventor 2017,我发现国内很少人用这款软件来设计产品。当然,这个无所谓,每个人的喜好不同。这款软件,怎么说呢,其实很强大,多数功能都能满足日常的设计需求。不过,我还是需要一种可以随意重命...