VB.NETで簡単な作図処理をやってみた。


直接、フォーム上に作図すると、

作図したものが他のウィンドウに隠れてしまうと、その部分が消えてしまう。

なので、イメージを保持してくれる方法がいい。


ってことで、そんな保持してくれそうな、PictureBoxを使ってみた。
CAD・CAD・Autocad-フォームへ作図1
新しいフォームにPictureBoxを貼付。



下記のようなコードを打って実行

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBox1.Image = New Bitmap(PictureBox1.Width, PictureBox1.Height)

Dim g As Graphics = Graphics.FromImage(PictureBox1.Image)

g.DrawRectangle(Pens.Red, 20, 20, 150, 150)
End Sub
End Class




CAD・CAD・Autocad-四角形作図
Button1をクリックすると、赤線の四角形が作図されます。


この四角形は、他のウィンドウに隠れても消えません。

にほんブログ村 科学ブログ 技術・工学へ にほんブログ村

目標とするものができそうだ。