【VB2008】 .MouseEnter時にe.Graphics.DrawString~をする方法
今晩は,いつも勉強させていただいております.
質問させていただきます.どうぞよろしくお願いいたします.
ボタンの文字を見やすくするため影付き文字にいたしておりますが
(下のコード1になります),このボタンにMouseEnterした際に,
クリックできることが分かりやすいよう影の色を変えようと思ったのですが
やり方が見つけられません...
<コード1>
Private Sub Button1_Paint(ByVal sender As
Object, ByVal e As System.Windows.Forms.PaintEventArgs) _
Handles Button1.Paint
e.Graphics.DrawString("TEST", _
New Font("MS Pゴシック", 10), Brushes.Black, 81, 11)
e.Graphics.DrawString("TEST", _
New Font("MS Pゴシック", 10), Brushes.Red, 80, 10)
End Sub
<トライしたコード>
Private Sub Button1_MouseEnter(ByVal sender As
Object, ByVal e As System.EventArgs) _
Handles Button1.MouseEnter
e.Graphics.DrawString("Test", _
New Font("MS Pゴシック", 10), Brushes.White, 81, 11)
e.Graphics.DrawString("Test", _
New Font("MS Pゴシック", 10), Brushes.Red, 80, 10)
End Sub
エラー「'Graphics'は'System.EventArgs'のメンバではありません」と
なるのは当然だと思うのでございますが,引数「e As ~」を書き直すなどいたしましても
通りませんorz
別の方法で「.Paint時に描いた文字色はそのままで,.MouseEnter時に
.ForeColorを変えれば...」などと考えましたが,ButtonのTextが
.Paintで描いた文字より上にくるのでうまくできませんでした...
もしとんちんかんなご質問でしたら申し訳ございません.何かよさそうな
方法がございましたらご紹介いただけないでしょうか.
もしお詳しい方がいらっしゃいましたら,是非ともアドバイスいただきたく
お願い申し上げます.
お礼
回答ありがとうございます。 無事、解決できました。 今後とも、よろしくお願いします。