投稿日 | : 2003/04/10(Thu) 09:52 |
投稿者 | : 魔界の仮面弁士 |
Eメール | : |
URL | : |
タイトル | : Re: インストールされているフォントの取得 |
> フォーム上に配置したコンボボックスにインストールされているフォントの名前を表示させたいのですが、
VB6であれば、ScreenオブジェクトのFontsプロパティを利用してください。
Private Sub Form_Load()
Dim I As Long
For I = 0 To Screen.FontCount - 1
Combo1.AddItem Screen.Fonts(I)
Next
End Sub
VB.NET であれば、FontFamilyクラスのGetFamiliesメソッドが使えるかも。