vb.net编程提取CAD中的点坐标，采用aCADapp.activedocument.utility.getpoint函数老是报错是什么原因啊？
发布于：2023-10-23 16:00:03
18人 分享
一种可能的原因是缺少对AutoCAD COM组件的引用。您可以尝试在项目中添加对AutoCAD COM组件的引用，以便可以调用aCADapp.activedocument.utility.getpoint函数。
要添加对AutoCAD COM组件的引用，请按照以下步骤进行操作：
1. 在解决方案资源管理器中，右键单击项目，然后选择“属性”。
2. 在属性窗口中，点击“引用”选项卡。
3. 点击“添加”按钮。
4. 在弹出的COM组件窗口中，找到并选中AutoCAD COM组件。通常可以在“已注册”或“已安装”的选项卡中找到。如果找不到，请确保您已经安装了AutoCAD软件。
5. 点击“确定”按钮以添加对AutoCAD COM组件的引用。
完成上述步骤后，您应该能够正常使用aCADapp.activedocument.utility.getpoint函数来提取CAD中的点坐标。
以下是代玛示例：
```vb.net
Imports Autodesk.AutoCAD.Interop
Public Class Form1
Dim acadApp As Autodesk.AutoCAD.Interop.AcadApplication
Dim acadDoc As Autodesk.AutoCAD.Interop.AcadDocument
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
acadApp = New Autodesk.AutoCAD.Interop.AcadApplication
acadApp.Visible = True
acadDoc = acadApp.Documents.Add()
End Sub
Private Sub btnGetPoint_Click(sender As Object, e As EventArgs) Handles btnGetPoint.Click
Dim point As Autodesk.AutoCAD.Interop.Common.Point3d
point = acadDoc.Utility.GetPoint()
MessageBox.Show("Coordinates: X = " & point.X & ", Y = " & point.Y & ", Z = " & point.Z)
End Sub
End Class
```
希望这可以帮助您解决问题。
转载请注明来源本文地址：https://m.tuituisoft/shinei/83696.html