フォーム上に配置したコンボボックスにインストールされているフォントの名前を表示させたいのですが、どなたかご存知の方、よろしくお願い致します。初心者ですので、あまり複雑なプログラムは理解できませんので、簡単な方法でお願いしたいのですが。

> フォーム上に配置したコンボボックスにインストールされているフォントの名前を表示させたいのですが、

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メソッドが使えるかも。

> > フォーム上に配置したコンボボックスにインストールされているフォントの名前を表示させたいのですが、
>
> 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メソッドが使えるかも。

ご指導ありがとうございます。実際に組み込みましたら動きました。ありがとうございました。

MSDNでFontsプロパティとFontCountプロパティを調べてみてください。

> MSDNでFontsプロパティとFontCountプロパティを調べてみてください。

ご提案ありがとうございます。そちらのほうも確認させていただきます。