下面这个语句会打开一个新的AutoCAD, 太慢.
Dim CADapp As New AutoCAD.AcadApplication
vb.net怎样在当前已打开的AutoCAD画图? 最好有个判断语句, 如果CAD已打开, 在当前画图; 如果没有, 则打开
答案:2 悬赏:30 手机版
解决时间 2021-02-13 23:36
- 提问者网友:呐年旧曙光
- 2021-02-13 08:45
最佳答案
- 五星知识达人网友:纵马山川剑自提
- 2021-02-13 10:10
Private Function isopen() As AutoCAD.AcadApplication
Try
dim CADapp_temp AutoCAD.AcadApplication = GetObject(, "AutoCAD.Application")
return CADapp_temp
Catch ex As Exception
Return Nothing
End Try
End Function
'调用上面的函数,如果为nothing表示没有打开,否则打开并返回对象
Try
dim CADapp_temp AutoCAD.AcadApplication = GetObject(, "AutoCAD.Application")
return CADapp_temp
Catch ex As Exception
Return Nothing
End Try
End Function
'调用上面的函数,如果为nothing表示没有打开,否则打开并返回对象
全部回答
- 1楼网友:轻熟杀无赦
- 2021-02-13 10:55
搜一下:vb.net怎样在当前已打开的AutoCAD画图? 最好有个判断语句, 如果CAD已打开, 在当前画图; 如果没有, 则打开
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯