投稿日 | : 2005/01/06(Thu) 17:12 |
投稿者 | : aki |
URL | : |
タイトル | : ありがとうございました。 |
お二方ともありがとうございました。
For icnt% = 0 To Screen.FontCount - 1
Me.cbo_FontName.AddItem Screen.Fonts(icnt%)
Next icnt%
Me.cbo_FontName.Text = "MS ゴシック"
っとScreenを用いてやってみました。
表示速度は全く問題ないようです。
重ねてありがとうございました。