お世話になります。
現在物凄く簡単な事で判らず困っています。

VB6.0で作成しています。
コマンドボタンを数個用意し、ボタンがフォーカスされている物に対して、
テキストの文字を太くするという簡単な方法が判らずに困っています。
モジュールを利用するのか、何も無しで行うのかも正直わかっていません。

現在行おうとしたことは、KeyDownを使用して、ボタンを押されたときにフォーカスの位置を
常に判定してフォーカス判定がtrueのボタンに対して常にFontBoldを
行ったらいいと思ったのですが、キーボードからの十字キーの判定が
KeyDownで判定してくれません。

どうすればいいのかわからないので、もしよければ皆さんのお知恵をお借りしたいと
思います。

宜しくお願いいたします。

以下コードを貼り付けておきます。


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'文字を太くする処理  Command1.FontBold = true
End Sub