Как рисовать?

[zeny]

делаю picturebox, называю его picbio пишу в picbio_Paint:
Dim myPen As New Pen(Color.Red)
Dim W As Integer, H As Integer
H = picbio.ClientRectangle.Height
W = picbio.ClientRectangle.Width

Try
picbio.CreateGraphics.DrawLine(myPen, 0, CInt(0.5 * H), CInt(W), CInt(0.5 * H))
Catch
End Try

ну и кнопку делаю и в ней пишу:
picbio_Paint(Nothing, Nothing)

и ничего на покете не рисуется %(
запускаю эту прогу на большом компе - всё рисуется!
что я делаю не так?

[mad_Max]

В событии Paint передается объект Graphics - используй его

Код: Выделить всё

e.Graphics.DrawLine(myPen, 0, CInt(0.5 * H), CInt(W), CInt(0.5 * H))

И чтобы сделать перерисовку, нужно picbio.Invalidate()

[zeny]

спасибо!