haifeng 发表于 2005-7-2 14:45:00

求助! vb.net怎样实现cad新建图层?

怎样在vb.net下实现cad新建图层.
帮忙介绍详细点!
谢谢!!!

jszfsoft 发表于 2005-7-2 19:10:00

Public Sub createNewLayer()
                                                                                       Dim db As Database = Application.DocumentManager.MdiActiveDocument.Database
                                                                                       Dim tm As DBTransMan = db.TransactionManager
                                                                                       Dim ta As Transaction = tm.StartTransaction()
                                                                                       Try
                                                                                                                       Dim LT As LayerTable = tm.GetObject(db.LayerTableId, OpenMode.ForWrite, False)
                                                                                                                       Dim LTRec As New LayerTableRecord
                                                                                                                       'LTRec.Name = "ASDK_MYLAYER"
                                                                                                                       LT.Add(LTRec)
                                                                                                                       tm.AddNewlyCreatedDBObject(LTRec, True)
                                                                                                                       ta.Commit()
                                                                                       Finally
                                                                                                                       ta.Dispose()
                                                                                       End Try
                                                       End Sub

haifeng 发表于 2005-7-3 22:59:00

非常谢谢
页: [1]
查看完整版本: 求助! vb.net怎样实现cad新建图层?