フォントについて (ID:106918)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 commondialogに関してなのですが Private Sub cmdfont_Click() 'キーをクリック 'キャンセルがおしたときErrhandlerへ行くように dialogfont.CancelError = True On Error GoTo ErrHandler 'ダイアログフォント呼び出し dialogfont.ShowFont 'ダイアログのフォントを入れる lblfont1 = dialogfont.FontName '------------------------------------------ Exit Sub ErrHandler: ' ユーザーが [キャンセル] ボタンをクリックしました。 Exit Sub End Sub このようなプログラムを実行したとき フォントがインストールされていません コントロールパネルにフォントをインストールしてくださいと 警告がきました。 osはw2kです フォントも入っています 手におえないのでどなたか教えてください