タイトル | : pictuerbox に縦棒をかきたいのですが、 |
記事No | : 7559 |
投稿日 | : 2008/05/18(Sun) 20:15 |
投稿者 | : monmon |
下記のようにしてみましたが、うまくいきません。 Graphics の初期設定が不足のようで、 g = Graphicsのところでエラーがでます。 どうしてなのかよくわかりません、教えてください。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As ...ton1.Click Dim pen As New Pen(Color.FromArgb(255, 0, 0, 0), 0) Dim g As Graphics g = Graphics g.DrawLine(pen, 20, 10, 20, 100) g.DrawLine(pen, 22, 10, 22, 100) g.DrawLine(pen, 24, 10, 24, 100) g.Dispose() end sub
|