Como dibujar 64 ellipse usando GDI

[dieama]

Necesito dibujar sobre un picturebox 64 elipses de 50 px ancho x 50 px de alto distribuidas en 8 filas con 8 elipses por fila lo que termina dando 64 elipses. Me han dicho que deberia usar 2 for pero no se como hacerlas. adjunto hecho hasta ahora alli pero alli hago ellipse por ellipse que esta mal porq deberia usar 2 for con un solo drawellipse pero no se como hacerlo

Public Class Form1
Dim gra As Graphics

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
gra = PictureBox.CreateGraphics
End Sub

Private Sub btAceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btAceptar.Click
'primera fila
gra.DrawEllipse(Pens.Black, 0, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 50, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 100, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 150, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 200, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 250, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 300, 0, 50, 50)
gra.DrawEllipse(Pens.Black, 350, 0, 50, 50)
'Segunda fila
gra.DrawEllipse(Pens.Black, 0, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 50, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 100, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 150, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 200, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 250, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 300, 50, 50, 50)
gra.DrawEllipse(Pens.Black, 350, 50, 50, 50)



End Sub
End Class

[Aquaventus]

Hola dieama 2 For? Mmm... Asumo eso porque te piden hacer 8 filas x 8 columnas(1 For para cada uno) :

Código vb:

'En el 1º For indicamos la cantidad de filas que se harán
        'Recordando que como primer índice tomamos el valor 1
        'Declaramos las variables y pasamos los valores a usar
        Dim filas As Integer = 8
        Dim columnas As Integer = 8
        'Declaramos las posiciones para crear los circulos
        Dim x As Integer = 0
        Dim y As Integer = 0
 
        'Crearemos las filas
        For f As Integer = 1 To filas
            'Crearemos las columnas
            For c As Integer = 1 To columnas
                'Dibujamos con los valores de X / Y
                gra.DrawEllipse(Pens.Black, x, y, 50, 50)
                'Una vez creada la columna
                'Damos un espacio de 50 hacia la derecha
                'Para la creacion de la siguiente columna
                'en la proxima iteracion
                y = y + 50
            Next
            'Una vez finalizada la creacion de las columnas
            'Damos un espacio de 50 hacia abajo
            'Para la creacion de la siguiente fila
            'En la proxima iteracion
            x = x + 50
            'E inicializamos el valor de la columna Y en 0(CERO)
            'Para comenzar desde la posicion inicial
            y = 0
        Next
 

Espero haberte ayudado, alli esta la explicacion para que podas entender del porqué los 2 For. Saludos!.

[dieama]

Salio de 10! muchisimas gracias.