Hola, estoy empezando con VB.NET y queria dibujar una serie de puntos que cambien el color segun el valor de un archivo.
Bueno dejando temas aparte, lo que ahora estaba provando es para ir dibujando puntos uno al lado del otro, como veis meti en el bucle for lo de dibujar y mypoint deberia variar con la x pero no hace nada.
¿Como podria hacerlo?

Código:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Const fic As String = "C:\Users\Pablo\Documents\heber\imagen.txt"
        Dim texto As String
        Dim i As Integer = 0
        Dim a As Double
        Dim Separo() As String
        Dim sr As New System.IO.StreamReader(fic)
        Dim x As Integer    'Variable x posicion dibujo
        Dim y As Integer = 10    'Variable x posicion dibujo
        Dim myPoint As Point = New Point(x, y)  'Creamos el punto de inicio
        Dim myLapicero As New Pen(Color.Black, 1)   'Aplicamos el color negro
        texto = sr.ReadToEnd()
        sr.Close()
        Separo = Split(texto, vbTab)
        TextBox1.Text = texto
        If Separo(15) > 0 Then
            a = Convert.ToDouble((Separo(15)))
 
        End If
        For x = 0 To 10
            PictureBox1.CreateGraphics.DrawEllipse(myLapicero, New Rectangle(myPoint, New Size(1, 1)))
            'MsgBox(x)
        Next x
 
    End Sub