这段VBScript代码用于在Catia中自动绘制图框和标题栏，适用于V5R14版本。它创建Drafting文档，设置尺寸，定义坐标，并提供了调整标准时的水平和垂直平移。代码还包含了线条宽度的修改以及标题栏文字的定位。
'COPYRIGHT DASSAULT SYSTEMES 2001
' ****************************************************************************
' Purpose: To draw a Frame and TitleBlock
' Assumptions: A Drafting document should be active
' Author: 彭阳国
' Languages: VBScript--catia automation
' Version: V5R14
' Release:
' #2011-7-20 by 16969
' ****************************************************************************
Public DrwDocument As DrawingDocument
Public DrwSheets As DrawingSheets
Public DrwSheet As DrawingSheet
Public DrwView As DrawingView
Public DrwTexts As DrawingTexts
Public Text As DrawingText
Public Fact As Factory2D
Public Point As Point2D
Public Line As Line2D
Public Circle As Circle2D
Public Selection As Selection
Public GeomElems A
最低0.47元/天 解锁文章
3060
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
