17-10-12, 05:29 PM
كاتب الموضوع : AhmedEssawy
كود :
'Draw line on form
Dim bit As Bitmap = New Bitmap(Me.Width, Me.Height)
Dim g As Graphics = Graphics.FromImage(bit)
Dim myPen As Pen = New Pen(Color.Blue, 3)
Me.CreateGraphics.DrawLine(myPen, 0, 0, Me.Width, Me.Height)