タイトル | : 描画できない理由は何でしょうか |
記事No | : 11334 |
投稿日 | : 2014/10/22(Wed) 14:05 |
投稿者 | : 祖父プログラマ |
いつも(勝手に)お世話になっております。
貴サイトのサンプルソースで下記のように MsgBoxを入れると、 A,Cは問題ありませんが Bを入れると描画されません。
理由が分からず不思議です。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("A")
Dim g As Graphics With PictureBox1 .Image = New Bitmap(100, 100) g = Graphics.FromImage(.Image) End With
MsgBox("B")
Dim f As New Font("MS Pゴシック", 14) g.DrawString("花ちゃん", f, Brushes.Blue, 10, 10) g.DrawLine(Pens.Black, 0, 40, 100, 40)
MsgBox("C")
f.Dispose() g.Dispose()
End Sub
|