タイトル : pictuerbox に縦棒をかきたいのですが、 投稿日 : 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 |