| タイトル | : 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 
 
 |