[عبـدالله]

جرب هذا الكود

PHP كود :

Private Sub Form1_Paint(sender As Object, e As PaintEventArgs) Handles Me.Paint

    Dim p As New Pen(Brushes.Green, 20) With {.EndCap = Drawing2D.LineCap.ArrowAnchor}
    e.Graphics.DrawLine(p, New Point(50, 100), New Point(250, 100))

End Sub