用vb.net创建标注样式问题

风雪共舞

小弟编了一个自动建立标注样式的程序，但是翻了很多资料都没有找到如何更改标注箭头的代码，默认的是三角箭头，我想用建筑类型的箭头，或者斜线类型的箭头有高手知道怎么设置吗?

sailorcwx

[CommandMethod("t5")]
        public void Test5()
        {
            Document doc = Application.DocumentManager.MdiActiveDocument;
            Database db = doc.Database;
            Transaction tr = doc.Database.TransactionManager.StartTransaction();
            using(tr)
            {

                DimStyleTable dst = tr.GetObject(db.DimStyleTableId, OpenMode.ForRead) as DimStyleTable;
                DimStyleTableRecord dstr = tr.GetObject(dst["ISO-25"], OpenMode.ForRead) as DimStyleTableRecord;
                BlockTable bt = tr.GetObject(db.BlockTableId, OpenMode.ForRead) as BlockTable;
                if (bt.Has("_ArchTick"))
                {
                    dstr.UpgradeOpen();
                    dstr.Dimblk1 = bt["_ArchTick"];
                    dstr.Dimblk2 = bt["_ArchTick"];
                }
                tr.Commit();
            }
            
        }