huangbx 发表于 2006-10-11 14:20:00

如何将已经存在的文字样式的字体改变啊

如:我已有的CAD图中有样式1这种文字样式,其对应的字体名为黑体,现在我想把其字体名变成宋体的,应该怎样设置啊,谢谢各位啦!

peicong 发表于 2006-10-31 13:32:00

'查找文字样式是否存在
      For Each AcadTxtStyle In ThisDrawing.TextStyles
            If AcadTxtStyle.Name = "样式1" Then
                AcadTxtStyle.fontFile = "Simplex.shx"
                AcadTxtStyle.BigFontFile = "hztxt.shx"
                AcadTxtStyle.ObliqueAngle = "0"
                AcadTxtStyle.Height = "0"
                AcadTxtStyle.Width = "0.85"
                Exit For
            End If
      Next
页: [1]
查看完整版本: 如何将已经存在的文字样式的字体改变啊