vb.net查看cad,vb数据库查询

vb.netcadgetpoint如何只能选切点

利用CAD对象捕捉功能。通过查询netcadgetpoint官网得知，vbnetcadgetpoint可以利用CAD对象捕捉功能才能选切点，vbnetcadgetpoint在新基建工程对话框当选择工程部类为Visual Basic工程。

相关问答

Q1: 如何用VB.NET编程语言实现打开CAD文件？

需要解析CAD文件的构成 然后根据规则绘制 说白点CAD文件是人家公司定义的一个文件格式 里面保存的不是图形 而是图形的绘制规则 程序AutoCad打开文件的时候是读取文件里面描写的绘制规则绘制图案的 你了解了CAD文件的构成后就可以自己写代码绘制图形了（具体CAD图形构成没研究过 你可以用记事本打开一个CAD的图形交换文件.Dxf 可以看到 这个文件是由图层说明和很多点坐标组成的）

Q2: VB.NET 如何通过按钮打开AUTOCAD的指定文件

Process.Start(“cad主程序的路径”，“要打开文件的目录”)

比如用记事本打开 c:\1.txt

Process.Start("C:\Windows\notepad.exe", "c:\1.txt")

Q3: VB.Net读取AutoCAD图纸

如果可以的话请把分给我

以下是cad2007版的，引用autocad 2007 type library 和autocad/objectdbx common 17如果是04或者版本更低的只要引用autocad 2007 type library，代码的话大同小异，思路是一样的

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        On Error Resume Next

        Dim acadapp As Autodesk.AutoCAD.Interop.AcadApplication

acadapp = GetObject(vbNullString, "autoCAD.application")

        Dim acaddoc As Autodesk.AutoCAD.Interop.AcadDocument

        acaddoc = acadapp.ActiveDocument

        Dim Ms As Autodesk.AutoCAD.Interop.Common.AcadModelSpace

        Ms = acaddoc.ModelSpace

        Dim acadObjectI As Autodesk.AutoCAD.Interop.Common.AcadObject

        Dim Linei As Autodesk.AutoCAD.Interop.Common.AcadLine

        Dim Circlei As Autodesk.AutoCAD.Interop.Common.AcadCircle

        Dim Polylinei As Autodesk.AutoCAD.Interop.Common.AcadPolyline

        Dim pt As Autodesk.AutoCAD.Interop.Common.AcadPoint

For Each acadObjectI In Ms

            Debug.Print(acadObjectI.ObjectName)

            Select Case acadObjectI.ObjectName

                Case "AcDbLine"

                    Linei = acadObjectI

                    Debug.Print("X =" Linei.StartPoint(0).ToString)

                    Debug.Print("Y =" Linei.StartPoint(1).ToString)

                Case ""

                Case ""

End Select

Next

    End Sub