收录日期:2019/04/18 21:08:43 时间:2016/06/01 15:44:19 标签:VB基础类
以前好像见过类似得例子,但是一下子想不起来了
Private Sub Form_Load()
Dim i As Integer
For i = 0 To Screen.FontCount - 1
Debug.Print Screen.Fonts(i)
Next i
End Sub
楼上的对的.
使用 CommonDialog 控件的 ShowFont 方法可显示“字体”对话框。
晕。。这么简单偶都忘记了,谢谢!结贴了^^

在server 2000取用户建的数据库? <>里的一个程序,看过的请进. CrystalReport报表,怎么让表中的字段从左到右显示,超过3个换页? 山路弯弯 谁知道哪里有source inside下载,100分相送 刚过了高程,散分,想和大家交个朋友:) 转贴!发人深省!! 高分求教!!!! 高分求一段代码,最高给1000分!!!!!!!!!!!!!!!!!!!!!!!!!!!!急 关于索引文件的小问题,可以拿高哦!!! 我的数码摄像机是Panasonic MV-MX500EN,本身具备网络摄像头的功能,可在NetMeeting里总是发现不了? 字体出现问题 菜鸟问题,关于查询结果的运算, 大侠们进来看啊! 运行wsad的电脑配置需求高吗? sos!!IEWebControls的下载和安装 任务管理器?? gcc怎么安装,怎么用? 急死我了,有没有人救我,多线程循环问题 TStringList的LoadFromFile报错应该如何防止? 一个学校朋友要交一份vb的作业(人员管理的),那位兄弟有这方面的源码? 多线程问题 找几个JAVA的QQ群 请问如何在REDHAT 9下安装3c509b网卡驱动 Delphi8问题 有关在自己的函数中用组件的问题。。。。。请教。。在线等~~~~~~~~ XP下安装Visual Studio的问题,急盼解答 XP下安装Visual Studio的问题,急盼解答 asp中如何读取查询的第3个记录的某个字段的值? 体验光电鼠……怎么好像不如机械的灵敏呢? 世界上最感人最悲伤的爱情故事