**User-865881720 posted**
If I'm correct in my assumption that pairs of numbers in the comma delimited string represent the verticies of the polygon, this should work (but has not been tested):

Public Sub DrawPolygonFromString(ByVal p As Pen, ByVal g As Graphics, ByVal s As String)

Dim strPoints() As String

Dim n, i, j As Integer

strPoints = s.Split(","c)

n = strPoints.Length

If n Mod 2 <> 0 Then

Throw New ArgumentException("Comma delimited string must contain an even number of values")

End If

n = (n \ 2) - 1

Dim Points(n) As Point

For i = 0 To n

j = i * 2

Points(i) = New Point(Convert.ToInt32(strPoints(j)), Convert.ToInt32(strPoints(j + 1)))

Next

g.DrawPolygon(p, Points)

End Sub

If by "use this String as pen" you meen that the numbers represent properties of a pen object, that's something entirely different.