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

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

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

HIRO's.NET RSS

HIRO's.NET HOME

VB.NET 2005 HOME

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

HOME > VB.NET 2005 Tips > GDI+ Tips メニュー

04.様々な塗りつぶした矩形を描画する

UPDATE:2006/07/23

<< 前のTips 次のTips >>

C#はこちら

　様々な塗りつぶした矩形を描画するにはGraphicsオブジェクトのFill～で始まるメソッドを使用します。

サンプル

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) _
    Handles Me.Paint

    'Graphicsオブジェクトを作成します
    Dim g As Graphics = e.Graphics

    'Brushオブジェクトの作成
    Dim brush1 As New SolidBrush(Color.Blue)


    g.FillRectangle(brush1, 10, 10, 100, 100)     '長方形を描画
    g.FillPie(brush1, 120, 10, 100, 100, 45, 90)  '扇形を描画
    g.FillEllipse(brush1, 10, 120, 100, 50)       '楕円を描画
    Dim pa() As Point = {New Point(120, 120), _
        New Point(170, 170), _
        New Point(170, 220), _
        New Point(150, 200)}                    '多角形描画用の座標を作成
    g.FillPolygon(brush1, pa)                     '多角形を描画


    'Brushオブジェクトの解放
    brush1.Dispose()

    'Graphicsオブジェクトの解放
    g.Dispose()
End Sub

<< 前のTips 次のTips >>