禁止在快编辑器中使用该命令

If Autodesk.AutoCAD.Internal.AcAeUtilities.IsInBlockEditor = True Then
            Application.DocumentManager.MdiActiveDocument.Editor.WriteMessage(vbCrLf & "禁止在快编辑器中使用该命令！")
            Exit Sub
        End If