Построение графика квадратного уравнения - Visual Basic .NET

Формулировка задачи:

Ребят, у меня тут проблема, я новичок в программировании и не могу понять как построить график для квадратичной функции на VB. Так выглядит код на данный момент:

                    Листинг программы
                
 
                        
                          
                    
Public Class Form1
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim a, b, c, d, x1, x2, i, s As Double
        Dim x As Single
        Dim y As Double
        a = TextBox1.Text
        b = TextBox2.Text
        c = TextBox3.Text
        d = b ^ 2 - 4 * a * c
        s = Math.Sqrt(d)
        If (s > 0) Then
            x1 = Math.Round((-b + s) / (2 * a), 3)
            x2 = Math.Round((-b - s) / (2 * a), 3)
            MsgBox("Дискриминант=" + Str(d) + vbCrLf + "x1=" + Str(x1) + vbCrLf + "x2=" + Str(x2))
        ElseIf (s = 0) Then
            x1 = Math.Round((-b) / (2 * a), 3)
            MsgBox("Дискриминант =" + Str(d) + vbCrLf + "x1=x2=" + Str(x1) + vbCrLf)
        Else
            MsgBox("Дискриминант меньше 0")
        End If
 
    End Sub
 
    Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
 
    End Sub

Помогите пожалуйста с остальным кодом, буду очень благодарен

Решение задачи: «Построение графика квадратного уравнения»

textual
                            Листинг программы 
                        
 Public Function fx(ByVal a As Single, b As Single, c As Single, x As Single)
        Dim y As Single
        y = a * x ^ 2 + b * x + c
        Return y
    End Function