HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS

VB.NET 2003の開発でお困りのことはありませんか？
そんな悩みは当サイトで解決！！

HOME > VB.NET 2003 Tips > コントロール > PictureBox Tips メニュー

09.図形や文字を描画する

UPDATE:2004/09/01 

<< 前のTips  次のTips >>

 

　PictureBoxに図形や文字を描画するには、Graphicsオブジェクトを作成して、描画を行います。

　
サンプル
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim objPen = New Pen(System.Drawing.Color.Blue, 2)
    Dim objFont = New Font("ＭＳ Ｐゴシック", 15)
    Dim objGrp As Graphics = PictureBox1.CreateGraphics

    ' 直線を引く
    objGrp.DrawLine(objPen, 5, 5, 5, 100)
    ' 楕円を描く
    objGrp.DrawEllipse(objPen, 10, 5, 50, 20)
    ' 楕円を描く
    objGrp.DrawString("描画テスト", objFont, Brushes.Red, 20, 20)

    ' リソースを解放する
    objPen.Dispose()
    objFont.Dispose()
    objGrp.Dispose()

End Sub
 

<< 前のTips  次のTips >>