社区 › VB › 在程序中单个文字字体怎么设置？

xianglongg 发表于 2006-12-13 10:03:00

在程序中单个文字字体怎么设置？

请教各位高手
我是一个新手，我现在在编一个程序，需要修改部分文字的字体，应该怎么设置？谢谢了

hookkk 发表于 2006-12-15 16:52:00

   发了两次代码，都没成功

xianglongg 发表于 2006-12-16 12:38:00

谢谢
我现在知道一种方法
ThisDrawing.SendCommand "-style" & Chr(13) & "hz1" & " " & Chr(13) & Chr(13) & Chr(13) & Chr(13) & Chr(13) & Chr(13) & Chr(13)
不过我想知道用vba语言怎么写

xianglongg 发表于 2006-12-30 18:17:00

我这样设置后
电脑的绘图速度有点慢
有人知道在vba中怎么设置吗
谢谢了

wyj7485 发表于 2006-12-31 09:13:00

stylename属性

mccad 发表于 2006-12-31 09:32:00

文字带是有文字样式的，字体是通过文字样式来设置的。你可以新建一个文字样式，然后单独设置你需要的文字为该文字样式。
如果需要只修改单个字符的文字样式，可以使用多行文字来实现，那样，每一个文字都可以设置不同的字体。

fjfhgdwfn 发表于 2006-12-31 09:36:00

ThisDrawing.ActiveTextStyle.fontFile = "C:\Program Files\AutoCAD R14\FONTS\hztxt_e.shx"
ThisDrawing.ActiveTextStyle.BigFontFile = "C:\Program Files\AutoCAD R14\FONTS\hzkt.shx"
试试这个。不带路径应也可以的。

xianglongg 发表于 2007-1-2 12:09:00

你好
我试过了 不行
我在图中已经建好的字体样式怎么调用呀

fjfhgdwfn 发表于 2007-1-2 18:59:00

应可以修改系统变量，让你的字体样式变成当前的。

xianglongg 发表于 2007-1-3 12:52:00

你好
这样的话图中只能有一种字体
要是有两三种字体的话这样就不行了
还有其他方法吗

查看完整版本: 在程序中单个文字字体怎么设置？