yangmz1972 发表于 2023-3-10 09:14:17

d1742647821 发表于 2023-2-27 18:50
参考我的视频
https://www.bilibili.com/video/BV1uA411D7mY/?spm_id_from=333.337.search-card.all.click

你好，再请教一下，参考你的示例，改写成vb.net代码，其中对象修改事件改成如下，但老是出错，不知道代码错在哪里，请帮忙看一下：
      Private Sub m1ModiEvent(ByVal senderObj As Object, ByVal evtArgs As EventArgs)
            Dim acDoc As Autodesk.AutoCAD.ApplicationServices.Document = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument
            Dim acCurDb As Database = acDoc.Database
            Dim acDocEd As Autodesk.AutoCAD.EditorInput.Editor = acDoc.Editor
            Dim mt As MText = CType(m1.MText.Clone(), MText)
            mt.Contents = GetBzStr(m1.GetFirstVertex(0))

            Using aclckdoc As DocumentLock = acDoc.LockDocument
                Using acTrans As Transaction = acCurDb.TransactionManager.StartTransaction()

                  m1.UpgradeOpen()
                  m1.MText = mt                           ‘运行到这里，没有用，不能实现修改Mleader的文本功能，这是怎么回事？
                  acTrans.Commit()
                End Using
            End Using

      End Sub
页: 1 [2]
查看完整版本: 请教高手，如何实现类似天正的坐标标注的算法。