D=AcadApp.ActiveDocument.Utility.GetPoint(,"選擇一個點:")
成都創(chuàng)新互聯(lián)專注于企業(yè)全網(wǎng)整合營銷推廣、網(wǎng)站重做改版、尖扎網(wǎng)站定制設計、自適應品牌網(wǎng)站建設、HTML5、電子商務商城網(wǎng)站建設、集團公司官網(wǎng)建設、成都外貿(mào)網(wǎng)站建設、高端網(wǎng)站制作、響應式網(wǎng)頁設計等建站業(yè)務,價格優(yōu)惠性價比高,為尖扎等各大城市提供網(wǎng)站開發(fā)制作服務。
你的參數(shù)沒有弄對
GetPoint是個方法不是屬性必須要括號()
他的兩個參數(shù)為可選參數(shù)(startpoint,prompt)第一個參數(shù)是起始點,第二個參數(shù)是提示語
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
'調(diào)用上面的函數(shù),如果為nothing表示沒有打開,否則打開并返回對象
Process.Start(“cad主程序的路徑”,“要打開文件的目錄”)
比如用記事本打開 c:\1.txt
Process.Start("C:\Windows\notepad.exe", "c:\1.txt")