把AutoCAD VBA的对象传递到Thisdrawing.SendCommand的参数中去
VBA不像lisp可以随意在命令行参数中传递对象,但可以采取如下方法:
Dim obj as AcadXXX
Dim ObjHandle as String
……
'将对象句柄转换成lisp表达式字符串,传递过去
ObjHandle = "(list(handent" & Chr(34) & obj.Handle & Chr(34) & "))"
ThisDrawing.SendCommand ("REGION" & vbCr & ObjHandle & vbCr & vbCr & vbCr)
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
· C#/.NET/.NET Core优秀项目和框架2025年2月简报
· Manus爆火,是硬核还是营销?
· 一文读懂知识蒸馏
· 终于写完轮子一部分:tcp代理 了,记录一下