catia 二次开发：环境变量路径,检查路径存在,关闭文件,对象为空,获取pad对象,err,part的product,全局变量,常量，SystemService,input,选择文件 时间，函数调用
文章目录
- 环境变量路径
- 检查路径是否存在
- 关闭文件的三种方法
- 对象为空
- 获取pad对象
- err
- 获取part文件的product属性
- 全局变量
- 常量
- SystemService
- Evaluate
- ExecuteScript
- input
- 选择打开文件
- 时间
- 函数调用
环境变量路径
' Dim sDocPath As String
' sDocPath = CATIA.SystemService.Environ("CATStartupPath")
检查路径是否存在
' m = CATIA.FileSystem.FolderExists(sDocPath)
' If (Not m) Then
' Err.Raise 9999, , "No Doc Path Defined"
' End If
关闭文件的三种方法
Dim sFilePath As StringsFilePath = CATIA.FileSystem.ConcatenatePaths("H:\test", "rr\Ford start part.CATPart")'路径拼接Dim idocuments As DocumentsSet idocuments = CATIA.DocumentsDim iPartDoc As Document
' Set iPartDoc = CATIA.Documents.Open(sFilePath)
'
' '关闭当前活动的文档
' CATIA.ActiveDocument.Close
'
' '再次打开相同的文档。
' Set iPartDoc = CATIA.Documents.Open(sFilePath)
'
' '使用为文档定义的变量关闭文档。
' iPartDoc.Close
'
' '第三次打开相同的文档。Set iPartDoc = idocuments.Open(sFilePath)'关闭由其名称指定的CATIA文档，最后,关闭CATIA文档的第三种方法是执行关闭方法在文档本身的名称检索使用文档集合的项目方法:因此从文档中删除文档收集和所有的窗户都包含它也关闭,从windows集合中删除。CATIA.Documents.Item("Ford start part.CATPart").Close对象为空
获取pad对象
err
获取part文件的product属性
全局变量
常量
常量不能再被赋值
SystemService
Evaluate
执行一段代码
Attribute VB_Name = "Module1"
Sub JKJ()
Set AA = CATIA.ActiveDocument
Set serv = CATIA.SystemServiceDim params()Dim codeToEvaluatecodeToEvaluate = "Sub CATMain()" & vbNewLine & _"MsgBox " & Chr(34) & "Hello World" & Chr(34) & vbNewLine & _"End Sub"serv.Evaluate codeToEvaluate, 0, "CATMain", paramsEnd SubExecuteScript
调用一个宏文件
Attribute VB_Name = "Module1"
Sub JKJ()
Set AA = CATIA.ActiveDocument
Set serv = CATIA.SystemService
Dim params()
serv.ExecuteScript "D:\dd", 1, "macro1.catvbs", "CATMain", params '这里的参数1是枚举类型 意思是目录类型
End Subinput
A = InputBox("请输入密码")
If A = 123 Then
CATIA.ActiveDocument.Close
End If
选择打开文件
时间
Attribute VB_Name = "Module4"
Sub CATMain()mon = Format(Now(), "m")
MsgBox monMyStr = Format(Time, "h:m:s") ' Returns "17:4:23".
MsgBox MyStr
MyStr = Format(Time, "hh:mm:ss AMPM") ' Returns "05:04:23 PM".
MsgBox MyStr
MyStr = Format(Date, "dddd, mmm d yyyy") ' Returns "Wednesday,
MsgBox MyStrEnd Sub函数调用
catia 二次开发：环境变量路径,检查路径存在,关闭文件,对象为空,获取pad对象,err,part的product,全局变量,常量，SystemService,input,选择文件 时间，函数调用相关推荐
- CAA教程——CATIA二次开发环境搭建
CAA教程--CATIA二次开发环境搭建 前言 开发环境搭建所需资源 安装注意事项 安装完成后的一些操作 测试程序的运行效果 CATIA帮助文档的设置 VS里利用CATIA帮助文档的查询接口功能 编译 ...
- CATIA二次开发CAA：（一）开发环境搭建
目录 一.完整的安装文件 二.总体的安装步骤 三.详细安装教程 1.Visual Studio 2012安装教程 2.CATIA 2016安装教程 3.CAA安装 4. RADE 5.CATIA&am ...
- Revit二次开发环境搭建（Revit 2019+Visual Studio 2017）
Revit二次开发环境搭建(Revit 2019+Visual Studio 2017) 安装 Revit 2019 Visual Studio 2017 Revit SDK 2019 配置Addin ...
- VS2019+QGIS开发库二次开发环境搭建
VS2019+QGIS开发库二次开发环境搭建 总共分为以下步骤: 下载qgis和二次开发库 VS2019搭建开发环境 配置VS2019中的Qt插件 配置完Qt版本后对工程属性进行配置 编写测试代码 运 ...
- Betaflight二次开发-环境搭建
关于对BetaFlight的二次开发环境搭建: 下载并修改eabi: https://developer.arm.com/tools-and-software/open-source-software ...
- Win10平台中ANSYS 18.2二次开发环境搭建及关联教程
笔者关于ANSYS二次开发平台搭建的基础知识均从师访老师在仿真论坛的帖子(链接:https://forum.simwe.com/thread-1021888-1-1.html)里以及他的<ANS ...
- CATIAV5R21+CAA+RADE+VS2008二次开发环境搭建注意事项
CATIAV5R21+CAA+RADE+VS2008二次开发环境搭建注意事项 安装CATIA ProgramData文件夹复制到C盘 netapi32.dll复制到CATIA安装路径 不勾选的许可证 ...
- 【UG二次开发环境建立教程】
UG二次开发环境建立教程 关于UG二次开发环境的两种建立方法 方法一:导入UG二次开发向导模板 1.分别安装UG软件和Visual Studio软件,保证软件可以正常打开使用. 2.打开UG安装目录, ...
- CATIA 二次开发 CAA笔记.新的开始
CATIA 二次开发 CAA笔记.新的开始 序 正题: 序 之前并没有什么编程的项目经验,说道本人的教育背景,本科化工机械,研究生考的车辆工程,然后在导师的建议下选择了协同方向, 自学了一点微不足道的 ...
- NX/UG二次开发环境配置方法—史上最详细版（以NX11.0和Visual Studio 2017为例）
一.前言 本人之前在用NX12.0以及Visual Studio 2017进行NX二次开发时,进行过开发环境的配置,当时也遇到了一点问题,好在最后解决了.最近由于项目需求,我卸载了NX12.0,重装了 ...
最新文章
- 业界丨涨薪20%！听听这位资深机器学习面试官的内心独白
- 回文链表—leetcode234
- 在.NET 6中使用DateOnly和TimeOnly
- 设计模式学习笔记——解释器(Interpreter)模式
- 电子计算机厂 四月份生产计,一题多解 分数和百分数应用题(1)
- PHP动态生成select标签
- JakartaEE 文件的上传和下载
- 中国移动苏州研发中心前端笔试（2）
- Nifi Api访问
- TARA-基于J3061的概念阶段流程
- php模板地图修改,让你一个地图拥有全部资源的修改方法
- 【HTML+CSS】字体字号行高
- 高通android充电常用问题,高通平台android9.0充电电量，充电指示灯以及充电图标读取分析...
- discuz mysql cpu 100_Discuz导致MYSQL CPU 占用 100%？
- dump和coredump
- 抖音矩阵系统，这个排名很难啊。按？
- 基于Springboot+vue的在线聊天系统
- 【STM32F429开发板用户手册】第42章 STM32F429的LTDC应用之点阵字体和字符编码（重要）
- HTML——flex布局
- 记一次诡异的摄像头调试经历