フォントのメニューを表示させるには。

[どうすれば...]

メモ帳などでフォントの太さ、種類を選択するメニューがありますよね。
ActiveBASICにも搭載されています。

これを表示させるための、コードを教えてください。

[hira]

ChooseFont関数ですね。
CHOOSEFONT構造体に必要な情報を格納し(具体的には構造体サイズ・親ウィンドウ・LOGFONT構造体へのポインタなど)、この関数を呼び出した後必要な情報を取り出せばいいだけです。
そのフォントをプログラムで使いたいときは、CreateFontIndirect関数の引数にこの構造体のlpLogFontメンバに指定したLOGFONT構造体を指定すればいいです。