以下のサイトを参考にしました。
http://uenomemo.blog31.fc2.com/blog-entry-224.html
http://dobon.net/vb/dotnet/graphics/drawimage.html
http://natchan-develop.seesaa.net/article/88512583.html
自分なりの記録（その１となっているが、続くかは不明）
As Any:
引渡し変数の内容を確認して、適当なものに変える。
vbFromUnicode, vbUnicode:
文字コードの変換は気にせずに
frmMain.Show():
frmMain.ShowDialog() にしよう。
PictureBoxコントロールに絵を描く
PictureBox.Cls:以下のコードに
PictureBox.Image = New Bitmap(PictureBox.ClientSize.Width,PictureBox.ClientSize.Height)
Dim g As Graphics = Graphics.FromImage(PictureBox.Image)
g.Dispose()
線を描く
PictureBox.Line (x0,y0)-(x1,y1):以下のgは上と同じ
g.DrawLine(Pens.Black, x0, y0, x1, y1)
PicbureBoxのHDCの取得
PictureBox.HDC:以下のコードに
Dim g As Graphics = PictureBox.CreateGraphics
Dim hdc As IntPtr = g.GetHdc()
http://uenomemo.blog31.fc2.com/blog-entry-224.html
http://dobon.net/vb/dotnet/graphics/drawimage.html
http://natchan-develop.seesaa.net/article/88512583.html
自分なりの記録（その１となっているが、続くかは不明）
As Any:
引渡し変数の内容を確認して、適当なものに変える。
vbFromUnicode, vbUnicode:
文字コードの変換は気にせずに
frmMain.Show():
frmMain.ShowDialog() にしよう。
PictureBoxコントロールに絵を描く
PictureBox.Cls:以下のコードに
PictureBox.Image = New Bitmap(PictureBox.ClientSize.Width,PictureBox.ClientSize.Height)
Dim g As Graphics = Graphics.FromImage(PictureBox.Image)
g.Dispose()
線を描く
PictureBox.Line (x0,y0)-(x1,y1):以下のgは上と同じ
g.DrawLine(Pens.Black, x0, y0, x1, y1)
PicbureBoxのHDCの取得
PictureBox.HDC:以下のコードに
Dim g As Graphics = PictureBox.CreateGraphics
Dim hdc As IntPtr = g.GetHdc()
