Tema: crear imagen
Ver Mensaje Individual
  #12 (permalink)  
Antiguo 15/07/2008, 11:53
Pax-Man
 
Fecha de Ingreso: noviembre-2003
Mensajes: 403
Antigüedad: 21 años, 4 meses
Puntos: 4
Respuesta: crear imagen

Bueno para usuarios futuros si alguna vez lo necesitan aqui esta el codigo de como crear picturebox a voluntad.. todo viene dado por una matriz de picturebox declarada al comienzo de todo y bueno codigo habla por si solo

Código:
    Dim imagen(50, 50) As PictureBox
    Dim fila, columna As Integer
    Private Sub IniciaTablero()
        imagen(fila, columna) = New PictureBox
        imagen(fila, columna).Name = "Picture " & CStr(fila) & CStr(columna)
        imagen(fila, columna).Size = New Point(20, 20)
        imagen(fila, columna).Location = New Point(20 * columna, 20 * fila)
        Me.Controls.Add(imagen(fila, columna))
    End Sub