Построение графика

Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        PictureBox1.Dock = DockStyle.Fill
        PictureBox1.BackColor = Color.White
        AddHandler pictureBox1.Paint, AddressOf Me.pictureBox1_Paint
 
        Me.Controls.Add(pictureBox1)
    End Sub
 
    Sub create_array()
        Dim mas(9) As Integer
        Dim n1 As Integer = 1 'минимальный элемент
        Dim n2 As Integer = 10 ' максимальный элемент
        Dim k As Integer = 8 ' всего элементов
        Dim i As Byte
        Randomize()
        For i = 0 To k
            mas(i) = CInt(Int((n2 * Rnd()) + n1))
        Next
    End Sub
    Private Sub pictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs)
 
        Dim g As Graphics = e.Graphics
        Dim point1 As New Point(100, 0)
        Dim point2 As New Point(100, 250)
        Dim point3 As New Point(100, 250)
        Dim point4 As New Point(600, 250)
    
        g.DrawLine(System.Drawing.Pens.Black, point1, point2)
        g.DrawLine(System.Drawing.Pens.Black, point3, point4)
    End Sub
 
End Class