如何取得计算机的所有字体 作者: 评价: 上站日期: 2001-09-04 内容说明: 来源: 取得屏幕字型: Dim I As Long For I = 0 To Screen.FontCount - 1 Combo1.AddItem Screen.Fonts(I) Next 取得打印机字型: Dim I As Long For I = 0 To Printer.FontCount - 1 Combo2.AddItem Printer.Fonts(I) Next
【评论】 【打印】 【字体:大 中 小】 本文链接:http://blog.pfan.cn/iamben250/6051.html
如何取得计算机的所有字体 作者: 评价: 上站日期: 2001-09-04 内容说明: 来源: 取得屏幕字型: Dim I As Long For I = 0 To Screen.FontCount - 1 Combo1.AddItem Screen.Fonts(I) Next 取得打印机字型: Dim I As Long For I = 0 To Printer.FontCount - 1 Combo2.AddItem Printer.Fonts(I) Next
阅读(2281) | 评论(0)
版权声明:编程爱好者网站为此博客服务提供商,如本文牵涉到版权问题,编程爱好者网站不承担相关责任,如有版权问题请直接与本文作者联系解决。谢谢!
评论