如何取得计算机的所有字型

2019-11-18 17:51:23

字体：大中小

来源：转载

供稿：网友

取得屏幕字型：
　DimIAsLong

　ForI=0ToScreen.FontCount-1
　　　Combo1.AddItemScreen.Fonts(I)
　Next

取得打印机字型：
　DimIAsLong

　ForI=0ToPRinter.FontCount-1
　　　Combo2.AddItemPrinter.Fonts(I)
　Next->

上一篇：将包含有Null结尾的字符串转换为VB字符串

下一篇：如何取得汉字的区位码

学习交流

索泰发布一款GTX 1070 Mini迷
AMD新旗舰显卡轻松干翻NVIDIA

索泰发布一款GTX 1070 Mini迷你版本:小机

索泰发布一款GTX 1070 Mini迷你版本:小机箱大爱...

usb无线网卡怎么用,小编告诉你安装教程09-10
usb调试在哪,小编告诉你usb调试在哪09-10
优盘不显示,小编告诉你优盘不显示怎么办09-10
低级格式化,小编告诉你硬盘怎么低级格式化09-10

帝国cms分类信息的所在地在的修改09-08
将网站地图和友情链接table样式改为div+css09-08
用帝国cms实现不规则新闻或信息调用（应大站09-08
帝国调用DZ论坛精华帖09-08
用灵动标签调用discuz和phpwind的最新贴子09-08

热门图片

芭蕾舞蹈表演，真实美到极致
下午茶时间，悠然自得的休憩
充斥这繁华奢靡气息的城市迪拜风景图片
从山间到田野再到大海美丽的自然风景图片
肉食主义者的最爱美食烤肉图片
夏日甜心草莓美食图片
人逢知己千杯少，喝酒搞笑图集
搞笑试卷，学生恶搞答题

猜你喜欢的新闻

荣耀总裁赵明乌镇演讲：荣耀首款5G手机V30下
搜狐张朝阳：回归媒体是搜狐重新崛起的关键
华为轮值董事长郭平：虚拟技术创造现实价值
第六届世界互联网大会开幕“to B”端成热门
滴滴英文服务上线两周年用户已超200万
华为推出全球至快AI训练集群Atlas900
马斯克：特斯拉正组建中国技术团队
10年后6G将问世速度有望比5G快100倍
WeworkCEO称已开始考虑未来职位不排除放弃
谷歌软件商店模式变革：推出5美元会员可用数

猜你喜欢的关注

聊天室实现私聊(一)
聊天室实现私聊(二)
聊天室实现私聊(三)
聊天室实现私聊(四)
网页在线人数统计的做法
ADO存取数据时如何实现留言记录的分页显示
一个简单聊天室的建立.(供学习参考)
构建你的网站新闻自动发布系统之一
构建你的网站新闻自动发布系统之二
构建你的网站新闻自动发布系统之三