D=AcadApp.ActiveDocument.Utility.GetPoint(,"选择一个点:")
成都创新互联专注于企业全网整合营销推广、网站重做改版、尖扎网站定制设计、自适应品牌网站建设、HTML5、电子商务商城网站建设、集团公司官网建设、成都外贸网站建设、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为尖扎等各大城市提供网站开发制作服务。
你的参数没有弄对
GetPoint是个方法不是属性必须要括号()
他的两个参数为可选参数(startpoint,prompt)第一个参数是起始点,第二个参数是提示语
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表示没有打开,否则打开并返回对象
Process.Start(“cad主程序的路径”,“要打开文件的目录”)
比如用记事本打开 c:\1.txt
Process.Start("C:\Windows\notepad.exe", "c:\1.txt")
当前文章:包含vb.net脱离cad的词条
分享链接:https://www.cdcxhl.com/article6/hcgpog.html
成都网站建设公司_创新互联,为您提供自适应网站、微信公众号、网站改版、虚拟主机、建站公司、网页设计公司
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联