/// 実習H4 グラフィックス(1) | プログラミング実習 |
プロジェクト名 実習H4イメージ描画
動作説明
画像をピクチャボックスに描画する。
デザイン
フォーム Form1
Size = 480, 300
ピクチャボックス picCanvas
BackColor = White
BorderStyle = FixedSingle
Image = right1.gif, right2.gif
Location = 12, 12
Size = 360, 240
コード(プログラム)
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
'Bitmapオブジェクト作成
@ = New Bitmap(picCanvas.Width, picCanvas.Height)
'Graphicsオブジェクト作成
Dim gr As A = Graphics. B (picCanvas.Image)
gr.DrawImage(My.Resources.right1, 50, 50)
gr.DrawImage(My.Resources.right2, 120, 50)
gr.DrawImage(My.Resources.right2, 50, 120)
gr.DrawImage(My.Resources.right1, 120, 120)
C 'picCanvasの更新
gr.Dispose() 'オブジェクト解放
End Sub
End Class
解説
複数のピクチャボックスを用意しなくても、このように複数の画像を描画することができる。
テスト
□ 4個の画像が描画される。
Memo 直接、画像ファイルを指定する方法
画像ファイルright1.gifが、”C:\Data\画像素材”フォルダにある場合、次のようにプログラムする。
gr.DrawImage(Image.FromFile("C:\Data\画像素材\right1.gif"), 50, 50)
/// 実習H4 グラフィックス(1) | Copyright©2014 Hiroshi Masuda |