[求助]创建指定样式名的单行文字

public void CreateStyle()
        {
            Database db = HostApplicationServices.WorkingDatabase;
            using (Transaction trans = db.TransactionManager.StartTransaction())
            {
                TextStyleTable st = (TextStyleTable)trans.GetObject(db.TextStyleTableId, OpenMode.ForWrite);
                String StyleName = "工程图";
                if (st.Has(StyleName) == false)
                {
                    TextStyleTableRecord str = new TextStyleTableRecord();
                    str.Name = StyleName;
                    str.FileName = "simfang.ttf";
                    //---------------------------------------------
                    // 设置SHX字体
                    // str.FileName = "gbenor"
                    //设置大字体.
                    // str.BigFontFileName = "gbcbig"
                    // --------------------------------------------
                    str.ObliquingAngle = 15 * Math.PI / 180;
                    str.XScale = 0.67;
                    ObjectId TextstyleId = st.Add(str);
                    trans.AddNewlyCreatedDBObject(str, true);
                    db.Textstyle = TextstyleId;
                    trans.Commit();
                }
            }
        }

;;;(JW-MK_TEXT PT STRING STYLE HEIGHT ANG)
(defun JW-MK_TEXT (PT STRING STYLE HEIGHT ANG)
  (if (entmake (list (cons 0 "TEXT")
       (cons 100 "AcDbEntity")
       (cons 100 "AcDbText")
       (cons 1 STRING)
       (cons 7 STYLE)
       (cons 10 PT)
       (cons 40 HEIGHT)
       (cons 50 ANG)
        )
      )
    (entlast)
  )
)

Public Sub addtext()
        Dim mytext As New DBText
        mytext.TextString = "测试"
        mytext.Position = New Point3d(0, 0, 0)
        Dim Db As Database = HostApplicationServices.WorkingDatabase
        Using Trans As Transaction = Db.TransactionManager.StartTransaction
            Dim TSB As TextStyleTable = Trans.GetObject(Db.TextStyleTableId, OpenMode.ForRead)
            mytext.TextStyle = TSB.Item("工程图")
            Dim spc As BlockTableRecord = Trans.GetObject(Db.CurrentSpaceId, OpenMode.ForWrite)
            spc.AppendEntity(mytext)
            Trans.AddNewlyCreatedDBObject(mytext, True)
            Trans.Commit()
        End Using
    End Sub

using System;
using System.Text;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;
namespace CsMgd25
{
    public class Class1
    {
        Database db = HostApplicationServices.WorkingDatabase;
        Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;
        [CommandMethod("Test")]
        public void Test()
        {
            ObjectId styleid = AddTextStyle("工程图", "txt.shx", "gbcbig.shx", 0, 0.7);
            ObjectId id = AddText(new Point3d(0, 0, 0), "乐筑天下", styleid, 2.5, 0);
        }
        // 将图形对象加入到模型空间的函数.
        public static ObjectId AppendEntity(Entity ent)
        {
            Database db = HostApplicationServices.WorkingDatabase;
            ObjectId entId;
            using (Transaction trans = db.TransactionManager.StartTransaction())
            {
                BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead);
                BlockTableRecord btr = (BlockTableRecord)trans.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite);
                entId = btr.AppendEntity(ent);
                trans.AddNewlyCreatedDBObject(ent, true);
                trans.Commit();
            }
            return entId;
        }
        // 由插入点、文字内容、文字高度和倾斜角度创建单行文字的函数.
        public static ObjectId AddText(Point3d position, string textString, ObjectId style, double height, double rotation)
        {
            try
            {
                DBText ent = new DBText();
                ent.Position = position;
                ent.TextString = textString;
                ent.Height = height;
                ent.Rotation = rotation;
                ObjectId entId = AppendEntity(ent);
                return entId;
            }
            catch
            {
                ObjectId nullId = ObjectId.Null;
                return nullId;
            }
        }
        //取得符号表的Id
        public ObjectId GetIdFromSymbolTable(SymbolTable st, string key)
        {
            using (Transaction trans = db.TransactionManager.StartTransaction())
            {
                if (st.Has(key))
                {
                    ObjectId idres = st[key];
                    if (!idres.IsErased)
                        return idres;
                    foreach (ObjectId id in st)
                    {
                        if (!id.IsErased)
                        {
                            SymbolTableRecord str = (SymbolTableRecord)trans.GetObject(id, OpenMode.ForRead);
                            if (str.Name == key)
                                return id;
                        }
                    }
                }
            }
            return ObjectId.Null;
        }
        //建立文字样式
        public ObjectId AddTextStyle(string name, string smallfont, string bigfont, double height, double xscale)
        {
            using (Transaction trans = db.TransactionManager.StartTransaction())
            {
                TextStyleTable TST = (TextStyleTable)trans.GetObject(db.TextStyleTableId, OpenMode.ForWrite);
                ObjectId id = GetIdFromSymbolTable(TST, name);
                if (id == ObjectId.Null)
                {
                    TextStyleTableRecord TSTR = new TextStyleTableRecord();
                    TSTR.Name = name;
                    TSTR.FileName = smallfont;
                    TSTR.BigFontFileName = bigfont;
                    TSTR.TextSize = height;
                    TSTR.XScale = xscale;
                    TST.UpgradeOpen();
                    id = TST.Add(TSTR);
                    trans.AddNewlyCreatedDBObject(TSTR, true);
                }
                return id;
            }
        }
    }
}