vb.net Chart control

Hello my name is Ozan Bayrak

I have a Windows Form Application

I just made a random numbers that I load on Datagridvieuw(As datatable) and I make a chart with that

But how can I change the size of the Points(symbols)

// Code //

    Dim dtTest As New DataTable
    Dim rndm As New Random

       'Onderstaande Code Heb ik erin gezet omdat als je Scatter Grafiek maakt of een andere die erbij staat.
        'Dan kan je het maar 1 keer doen want anders geeft die een foutmelding van dat die al bestaat de gegevens.
        'Dus de onderstaande code zegt van wanneer je op de button klikt dat maakt die het grafiek leeft
        'En Schrijft die het overnieuw.
        Chart1.Series.Clear()

        'Hier schrijf ik Series(Legenda) toe aan het grafiek.
        Chart1.Series.Add("Numeriek1")
        Chart1.Series.Add("Numeriek2")

        'Dit is voor de Groep
        With Chart1.Series(0)
            'Naam van de Series
            .Name = "Groep"
            'Lettertype / Grootte etc.
            .Font = New Font("Arial", 8, FontStyle.Italic)
            'Kleur van de punten
            .Color = Color.Red
            'Tweede kleur voor de punten(overloop) als je het mooi vindt bijvoorbeeld.
            .BackSecondaryColor = Color.Red
            'Label erbij zetten ja of nee
            .IsValueShownAsLabel = True
            'Achtergrondkleur voor label
            .LabelBackColor = Color.LightPink
            'Kleur lettertypen voor de label
            .LabelForeColor = Color.Red
            'Hier zet die de punten in de grafiek.
            .Points.DataBind(dtTest.DefaultView, "ID", "Groep", Nothing)
        End With

        '' dit is voor de Numeriek
        With Chart1.Series(1)
            'Naam van de Series
            .Name = "Numeriek1"
            'Lettertype / Grootte etc.
            .Font = New Font("Arial", 8, FontStyle.Italic)
            'Kleur van de punten
            .Color = Color.Black
            'Tweede kleur voor de punten(overloop) als je het mooi vindt bijvoorbeeld.
            .BackSecondaryColor = Color.Black
            'Label erbij zetten ja of nee
            .IsValueShownAsLabel = True
            'Achtergrondkleur voor label
            .LabelBackColor = Color.LightGray
            'Kleur lettertypen voor de label

            .LabelForeColor = Color.Black
            'Hier zet die de punten in de grafiek.
            .Points.DataBindY(dtTest.DefaultView, "Numeriek1")
        End With

        'Dit is de eigenschappen voor de grafiek.
        With Chart1.ChartAreas(0)
            'Dit is hoeveel verticaal lijn je wilt hebben voor de punten.
            .AxisX.Interval = 1
            ' Dit is voor de (ID) hoeveel graden je het wilt draaien je kan het schuin of omgekeerd etc. het mag
            ' niet boven de 90
            .AxisX.LabelStyle.Angle = -90
            'wat wil je op de X as schrijven
            .AxisX.Title = "X As"
            ' wat wil je op de Y as schrijven
            .AxisY.Title = "Y As"

        End With
        'Dit is de Grootte van de grafiek.
        Me.Size = New Size(900, 600)

        'Dit is voor de Series(0) en (1) welke grafiek typen je wilt hebben.
        'hier heb ik gekozen voor Bubble(Scatter)
        'Als je de bubble weghaalt krijg je een lijst met grafieken
        'Soms kan je de grafiek niet kiezen omdat je dan niet voldoende punten hebt om dat te doen.
        Chart1.Series(0).ChartType = SeriesChartType.Bubble
        Chart1.Series(1).ChartType = SeriesChartType.Bubble

// End code //

// Code For Load Data in the Datagridvieuw //

'In de Form load laat ik de gegevens er automatisch erin staan.
        'in de Datagridvieuw maak ik Kolommen aan "ID(String),Groep(Integer),Numeriek1(Integer),Numeriek2(Integer)"
        dtTest.Columns.Add("ID", GetType(String))
        dtTest.Columns.Add("Groep", GetType(Integer))
        dtTest.Columns.Add("Numeriek1", GetType(Integer))
        dtTest.Columns.Add("Numeriek2", GetType(Integer))

        'Hier begin ik de Groep/Numeriek enzv te vullen met een For

        Dim rnd As New Random
        'Als je wilt dat de 10.000 cellen zijn moet je de 11 veranderen in 10.000
        ' nu zijn er maar 11 cellen die ik gebruik
        For r As Integer = 0 To 11
            'Hier zeg ik dat getal(Groep) tussen de 1 en 0 moet zijn.
            Dim getal As Integer = rnd.Next(0, 2)
            'Hier zeg ik dat de Groep(Groep) tussen de 0 en de 40 moet zijn
            Dim groep As Integer = rnd.Next(1, 41)
            'Hier zeg ik dat Numeriek1(Numeriek1) tussen de 0 en de 20 moet zijn
            Dim Numeriek1 As Integer = rnd.Next(1, 21)
            'Hier zeg ik dat Numeriek2(Numeriek2) tussen de 30 en 50 moet zijn.
            Dim Numeriek2 As Integer = rnd.Next(31, 51)

            'Hier vul ik de gegevens hier boven aan de Datatable(Kolommen)
            ' Getal(Groep) enzv
            dtTest.Rows.Add(getal, groep, Numeriek1, Numeriek2)
        Next
        'Hier laad ik het in de daatagridvieuw zien
        DataGridView1.DataSource = dtTest.DefaultView

        'Dit is overbodig dit kan je gebruiken of niet
        'het is voor Dock(Hoe je het wilt hebben Boven/onder/rechts/links de grafiek)
        Chart1.Dock = DockStyle.Bottom
        Chart1.Anchor = AnchorStyles.Bottom Or AnchorStyles.Top

// End Code //

Would Somebody please help me ?

Regards

Ozan Bayrak