[求助]如何在vb里加载和使用大字体文件
哪位高手,指点一下.主要是如何在VB中使用大字体文件?如何加载?FontsName = "C:\AutoCAD 2002\Fonts\等线体(标准).shx"
ThisDrawing.ActiveTextStyle.fontFile = FontsName
ThisDrawing.ActiveTextStyle.BigFontFile = FontsName
这样可以用, 创建新字体AAA(111.shx,222.shx)
Dim txtStyle As AcadTextStyle
Set txtStyle = ThisDrawing.TextStyles.Add("AAA")
txtStyle.fontFile = "111.shx"
txtStyle.BigFontFile = "222.shx"
txtStyle.Width = 1
ThisDrawing.ActiveTextStyle = ThisDrawing.TextStyles.Add("AAA")
页:
[1]