
15/07/2008, 11:53
|
| | 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
|