ボタンの画像を大きさを調整しながら表示する 【注意書き】●VB.NET を使っているものとします。●動作環境は、Windows XX を使用しているとします。.NET でも、画像の大きさにあわせてボタンに画像を表示することが可能です。この機能を使えば、画像の大きさに左右されずボタンの画像の大きさにあわせてボタンを表示したりボタンの大きさにあわせてボタン画像を表示することが可能ですフォームに次の様なコードを記述します-----------VB.NETコーディングここから-------------------１．フォームに、ボタンコントロール を配置します。 下記は、デフォルトのオブジェクトの名前と配置を示しています。 ┏━━━━━┓┏━━━━━┓ ┃Button1 ┃┃Button2 ┃ ┗━━━━━┛┗━━━━━┛２．フォームをダブルクリックして、 フォームロードイベントのコード編集を開始して、 次のコードを記述します。 Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load 'イメージオブジェクト Dim img As Image '画像ファイルを指定しています img = Image.FromFile( _ "c:\image.gif") With Button1 .BackgroundImage = img .Width = img.Width .Height = img.Height End With With Button2 .BackgroundImage = _ New Bitmap(img, .Width, .Height) End With End Sub３．ビルドして実行します。４．フォームに表示された ボタンに、画像イメージが表示されます。 Button1 の大きさは、 ボタンの画像の大きさにあわせてボタンを表示します Button2 の大きさは、 ボタンの大きさにあわせてボタン画像を表示します-----------VB.NETコーディングここまで------------------- img = Image.FromFile( _ "c:\image.gif")表示する画像へのファイルパスを上記で指定しています適当に変更して試してみます。画像の大きさを変更するコードとしてNew Bitmap(img, Button2.Width, Button2.Height)を使用しています
Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。
