VB 如何检测指定系统字体是否存在?

使用组合框...

2026年09月28日 08:18

有1个网友回答

网友（1）：

Private Sub Command1_Click()
Dim i, m
For i = 0 To Screen.FontCount - 1
If Text1.Text = Screen.Fonts(i) Then m = 1
Next
If m = 1 Then MsgBox "含有此字体"
End Sub

最新问答

日产新轩逸轮毂4s店多少钱，轩逸换4个铁轮毂多少钱

女的叫半面装的网名男的情侣网名应该叫什么求解答？？

房屋后面种植什么树对风水好?

14、通往广场的路不止一条阅读题3、4小题

黑旋风的介绍

我想买一个日式便当盒，请问上海哪里有卖？便宜点的，别说网上(>^ω^<)

防火板材特点防火板材分类

玉米喷药机什么牌子的能用住

在快递公司上班干了在流水线上拉包的活，有时候多了干不过来怎么办？求助，还得看号分类

前任需要帮助应该帮吗。？