VB 获得系统字体列表
2008-05-03 13:10
246 查看
Private Sub Form_Load()
Dim counter
For counter = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(counter)
Next
End Sub
Dim counter
For counter = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(counter)
Next
End Sub
相关文章推荐
- 在vb中使用Iphlpapi.dll获取网络信息 第二章 第十二节 获得本机系统网络接口适配器的列表
- 在vb中使用Iphlpapi.dll获取网络信息 第二章 第十二节 获得本机系统网络接口适配器的列表
- 获得系统字体列表
- 用VB获得Windows各类系统目录
- flash 获取系统字体列表
- MFC 中自定义输出字体CFont和获得系统当前默认字体CFont
- VB获得系统目录
- c#获得windows系统进程列表,任务列表
- 从注册表获得系统串口列表C++(2010-03-05)
- [JAVA] java_实例 获得系统字体
- C#调用Illustrator CS4生成系统所有字体列表并保存为AI文件(Illustrator矢量图形编程之4)
- 打印iPhone系统自带的字体列表
- 论坛源码推荐(8.26):iOS 8 Today 视图扩展(插件),系统字体样式列表
- 如何获得Linux系统的内置模块和设备驱动列表
- 使用系统表获得MS SQL Server表或视图的字段列表及其数据类型
- [VB.NET]怎样才能在自己的程序自动运行后获得系统中被点击文件夹的路径?(下)
- AHK 获取系统已安装字体列表
- [zz]通过win32扩展接口使用 Python获得系统进程列表的方法
- 获得系统所有字体
- C#调用Illustrator CS4生成系统所有字体列表并保存为AI文件(Illustrator矢量图形编程之4)