□投稿者/ Hirotow -(2007/03/01(Thu) 22:12:07) >
| > Dim BluePen As Pen = New Pen(Color.Blue) > For i = 0 To 255 > g.DrawLine(BluePen, 10 + i, 290. 10 + i, 290 - tmp(i)) > Next > ' BluePen.Dispose() ' Color.Blue がシステム定義カラーだから、要らないかもしれない >
Pens.Blue とかあったような。 |
|